Profiling results ----------------- Total cpu time observed: 20030ms (out of 20424ms) Number of samples taken: 89 (once every 225ms) (Hiding functions with self<1.0% and local<2.0%: 1 of 106 hidden) ======================================================================= Caller Idx Total Self Name+src Local% ms(pct) ms(pct) Callee ======================================================================= ??? [29] 100.0% [1] 19096(95.3%) 0(0.0%) profile-thunk14 ...t/pkgs/profile-lib/main.rkt:9:0 run [6] 100.0% ----------------------------------------------------------------------- ??? [29] 100.0% [2] 14884(74.3%) 0(0.0%) run-improve58 ...ock/herbie/src/mainloop.rkt:242:0 for-loop [7] 95.9% setup-prog [11] 2.8% loop [40] 1.3% ----------------------------------------------------------------------- simplify-alt [14] 1.6% ??? [29] 98.4% [3] 12640(63.1%) 0(0.0%) simplify ...lock/herbie/src/core/simplify.rkt:39:0 simplify-expr [8] 46.9% iterate-egraph!5 [13] 44.0% for-loop [9] 9.1% ----------------------------------------------------------------------- location-do [54] 100.0% [4] 438(2.2%) 0(0.0%) approximate9 ...ck/herbie/src/core/taylor.rkt:11:0 loop [10] 100.0% ----------------------------------------------------------------------- hash-ref! [26] 100.0% [5] 202(1.0%) 0(0.0%) f94 ...t/collects/racket/match/compiler.rkt:499:40 loop [74] 100.0% ----------------------------------------------------------------------- profile-thunk14 [1] 100.0% [6] 19096(95.3%) 0(0.0%) run ...share/racket/pkgs/profile-lib/main.rkt:31:2 ??? [29] 100.0% ----------------------------------------------------------------------- run-improve58 [2] 100.0% [7] 14274(71.3%) 0(0.0%) for-loop ...ztatlock/herbie/src/mainloop.rkt:253:8 run-iter! [12] 100.0% ----------------------------------------------------------------------- simplify [3] 100.0% [8] 5932(29.6%) 0(0.0%) simplify-expr ...herbie/src/core/simplify.rkt:68:0 iterate-egraph!5 [13] 100.0% ----------------------------------------------------------------------- simplify [3] 100.0% [9] 1152(5.8%) 0(0.0%) for-loop ...ock/herbie/src/core/simplify.rkt:61:12 iterate-egraph!5 [13] 84.9% loop [15] 15.1% ----------------------------------------------------------------------- approximate9 [4] 100.0% [10] 438(2.2%) 0(0.0%) loop ...e/ztatlock/herbie/src/core/taylor.rkt:82:4 hash-ref! [26] 100.0% ----------------------------------------------------------------------- run-improve58 [2] 100.0% [11] 414(2.1%) 0(0.0%) setup-prog /home/ztatlock/herbie/src/glue.rkt:46:0 ??? [25] 52.7% simplify-alt [14] 47.3% ----------------------------------------------------------------------- for-loop [7] 100.0% [12] 14274(71.3%) 0(0.0%) run-iter! ...tatlock/herbie/src/mainloop.rkt:223:0 simplify! [16] 90.0% finalize-iter! [18] 5.6% gen-series! [19] 3.1% localize-error [20] 1.4% ----------------------------------------------------------------------- for-loop [9] 7.8% simplify [3] 44.6% simplify-expr [8] 47.6% [13] 12466(62.2%) 0(0.0%) iterate-egraph!5 ...bie/src/core/simplify.rkt:95:0 one-iter [17] 98.3% ----------------------------------------------------------------------- setup-prog [11] 100.0% [14] 196(1.0%) 0(0.0%) simplify-alt .../ztatlock/herbie/src/glue.rkt:84:0 simplify [3] 100.0% ----------------------------------------------------------------------- for-loop [9] 100.0% [15] 174(0.9%) 0(0.0%) loop ...tatlock/herbie/src/core/simplify.rkt:203:2 pass [21] 100.0% ----------------------------------------------------------------------- run-iter! [12] 100.0% [16] 12840(64.1%) 0(0.0%) simplify! ...tatlock/herbie/src/mainloop.rkt:162:0 for-loop [22] 100.0% ----------------------------------------------------------------------- iterate-egraph!5 [13] 100.0% [17] 12248(61.1%) 826(4.1%) one-iter ...ock/herbie/src/core/simplify.rkt:106:0 for-loop [23] 48.0% loop [24] 41.9% apply-match [30] 3.3% ----------------------------------------------------------------------- run-iter! [12] 100.0% [18] 800(4.0%) 0(0.0%) finalize-iter! ...ck/herbie/src/mainloop.rkt:177:0 ??? [25] 100.0% ----------------------------------------------------------------------- run-iter! [12] 100.0% [19] 438(2.2%) 0(0.0%) gen-series! ...tlock/herbie/src/mainloop.rkt:134:0 for-loop [27] 100.0% ----------------------------------------------------------------------- run-iter! [12] 100.0% [20] 196(1.0%) 0(0.0%) localize-error ...erbie/src/core/localize.rkt:47:0 hash-ref! [26] 100.0% ----------------------------------------------------------------------- loop [15] 100.0% [21] 174(0.9%) 0(0.0%) pass ...tatlock/herbie/src/core/simplify.rkt:193:2 for-loop [28] 100.0% ----------------------------------------------------------------------- simplify! [16] 100.0% [22] 12840(64.1%) 0(0.0%) for-loop ...ztatlock/herbie/src/mainloop.rkt:166:6 ??? [29] 96.9% debug-print [33] 3.1% ----------------------------------------------------------------------- for-loop [23] 50.0% one-iter [17] 50.0% [23] 5884(29.4%) 984(4.9%) for-loop ...ck/herbie/src/core/simplify.rkt:116:12 for-loop [23] 50.0% match-e [39] 41.6% ----------------------------------------------------------------------- one-iter [17] 100.0% [24] 5130(25.6%) 0(0.0%) loop ...cket/collects/racket/private/map.rkt:53:19 apply-match [30] 100.0% ----------------------------------------------------------------------- setup-prog [11] 21.4% finalize-iter! [18] 78.6% [25] 1018(5.1%) 0(0.0%) ??? ...contract/private/arrow-val-first.rkt:357:18 for-loop [31] 58.7% make-alt-table [34] 21.4% atab-add-altns [36] 19.8% ----------------------------------------------------------------------- ??? [35] 23.9% localize-error [20] 30.9% loop [10] 45.2% [26] 634(3.2%) 0(0.0%) hash-ref! ...racket/private/more-scheme.rkt:373:13 simplify [79] 37.2% parse-loop12 [37] 30.9% ??? [35] 23.9% f94 [5] 8.0% ----------------------------------------------------------------------- gen-series! [19] 100.0% [27] 438(2.2%) 0(0.0%) for-loop ...ztatlock/herbie/src/mainloop.rkt:140:7 taylor-alt [32] 100.0% ----------------------------------------------------------------------- pass [21] 100.0% [28] 174(0.9%) 0(0.0%) for-loop ...ck/herbie/src/core/simplify.rkt:196:29 for-loop [38] 100.0% ----------------------------------------------------------------------- for-loop [22] 21.5% run [6] 38.1% [29] 20030(100.0%) 0(0.0%) ??? ...lects/racket/private/more-scheme.rkt:261:28 profile-thunk14 [1] 38.1% run-improve58 [2] 27.6% simplify [3] 21.5% loop [40] 12.8% ----------------------------------------------------------------------- one-iter [17] 7.4% loop [24] 92.6% [30] 5538(27.6%) 378(1.9%) apply-match .../herbie/src/core/simplify.rkt:122:2 merge-egraph-nodes! [41] 40.1% update-leader! [50] 28.5% match-e [39] 11.0% mk-enode! [45] 3.6% substitute-e [46] 3.6% for-loop [48] 3.2% reduce-to-single! [49] 3.2% ----------------------------------------------------------------------- ??? [25] 100.0% [31] 598(3.0%) 0(0.0%) for-loop ...ock/herbie/src/core/alt-table.rkt:51:2 atab-add-altn [42] 100.0% ----------------------------------------------------------------------- for-loop [27] 100.0% [32] 438(2.2%) 0(0.0%) taylor-alt ...e/ztatlock/herbie/src/glue.rkt:142:0 for-loop [43] 100.0% ----------------------------------------------------------------------- for-loop [22] 100.0% [33] 396(2.0%) 0(0.0%) debug-print ...ztatlock/herbie/src/debug.rkt:107:0 for-loop [44] 100.0% ----------------------------------------------------------------------- ??? [25] 100.0% [34] 218(1.1%) 0(0.0%) make-alt-table ...rbie/src/core/alt-table.rkt:32:0 errors [65] 100.0% ----------------------------------------------------------------------- hash-ref! [26] 100.0% [35] 202(1.0%) 0(0.0%) ??? ...e/ztatlock/herbie/src/core/taylor.rkt:63:15 hash-ref! [26] 100.0% ----------------------------------------------------------------------- ??? [25] 100.0% [36] 202(1.0%) 0(0.0%) atab-add-altns ...rbie/src/core/alt-table.rkt:50:0 atab-add-altn [42] 100.0% ----------------------------------------------------------------------- hash-ref! [26] 100.0% [37] 196(1.0%) 0(0.0%) parse-loop12 ...s/racket/match/compiler.rkt:410:15 loop [47] 100.0% ----------------------------------------------------------------------- for-loop [28] 100.0% [38] 174(0.9%) 174(0.9%) for-loop ...ck/herbie/src/core/simplify.rkt:183:13 ----------------------------------------------------------------------- apply-match [30] 7.4% for-loop [64] 8.7% for-loop [23] 83.9% [39] 5508(27.5%) 3110(15.5%) match-e ...tatlock/herbie/src/core/ematch.rkt:46:0 for-loop [52] 25.1% for-loop [64] 9.0% filter [56] 3.7% constant? [57] 3.7% custom-in-set [59] 3.6% list-cartesian-product [66] 1.8% ----------------------------------------------------------------------- run-improve58 [2] 3.7% ??? [29] 96.3% [40] 5342(26.7%) 0(0.0%) loop /home/ztatlock/herbie/src/points.rkt:122:2 make-exacts* [61] 53.0% loop [51] 43.4% loop [63] 3.7% ----------------------------------------------------------------------- apply-match [30] 100.0% [41] 2222(11.1%) 0(0.0%) merge-egraph-nodes! ...e/src/core/egraph.rkt:152:0 update-leader! [50] 80.6% enode-merge! [55] 10.4% loop! [81] 9.1% ----------------------------------------------------------------------- atab-add-altns [36] 25.2% for-loop [31] 74.8% [42] 800(4.0%) 0(0.0%) atab-add-altn ...rbie/src/core/alt-table.rkt:208:0 best-and-tied-at-points [53] 74.8% override-at-pnts [58] 25.2% ----------------------------------------------------------------------- taylor-alt [32] 100.0% [43] 438(2.2%) 0(0.0%) for-loop /home/ztatlock/herbie/src/glue.rkt:144:2 location-do [54] 100.0% ----------------------------------------------------------------------- debug-print [33] 100.0% [44] 396(2.0%) 396(2.0%) for-loop /home/ztatlock/herbie/src/debug.rkt:113:2 ----------------------------------------------------------------------- apply-match [30] 100.0% [45] 200(1.0%) 200(1.0%) mk-enode! ...lock/herbie/src/core/egraph.rkt:101:0 ----------------------------------------------------------------------- substitute-e [46] 50.0% apply-match [30] 50.0% [46] 200(1.0%) 200(1.0%) substitute-e ...ck/herbie/src/core/ematch.rkt:71:0 substitute-e [46] 50.0% ----------------------------------------------------------------------- parse-loop12 [37] 16.7% loop [47] 83.3% [47] 196(1.0%) 0(0.0%) loop ...cket/collects/racket/private/map.rkt:37:19 loop [47] 83.3% ->flonum [80] 16.7% ----------------------------------------------------------------------- apply-match [30] 100.0% [48] 178(0.9%) 0(0.0%) for-loop ...ck/herbie/src/core/simplify.rkt:136:10 loop! [81] 100.0% ----------------------------------------------------------------------- apply-match [30] 100.0% [49] 176(0.9%) 0(0.0%) reduce-to-single! ...bie/src/core/egraph.rkt:324:0 for-loop [60] 100.0% ----------------------------------------------------------------------- apply-match [30] 46.8% merge-egraph-nodes! [41] 53.2% [50] 3366(16.8%) 0(0.0%) update-leader! ...herbie/src/core/egraph.rkt:217:0 for-loop [62] 100.0% ----------------------------------------------------------------------- loop [40] 100.0% [51] 2316(11.6%) 0(0.0%) loop /home/ztatlock/herbie/src/points.rkt:93:2 loop [63] 59.7% make-exacts* [61] 40.3% ----------------------------------------------------------------------- match-e [39] 100.0% [52] 1574(7.9%) 594(3.0%) for-loop ...tlock/herbie/src/core/ematch.rkt:59:11 list-cartesian-product [66] 31.8% for-loop [64] 30.4% ----------------------------------------------------------------------- atab-add-altn [42] 100.0% [53] 598(3.0%) 0(0.0%) best-and-tied-at-points ...ore/alt-table.rkt:122:0 errors [65] 100.0% ----------------------------------------------------------------------- for-loop [43] 33.3% location-do [54] 66.7% [54] 438(2.2%) 0(0.0%) location-do ...tlock/herbie/src/programs.rkt:129:0 location-do [54] 66.7% approximate9 [4] 33.3% ----------------------------------------------------------------------- merge-egraph-nodes! [41] 100.0% [55] 230(1.1%) 0(0.0%) enode-merge! ...ck/herbie/src/core/enode.rkt:100:0 adopt-enode! [67] 100.0% ----------------------------------------------------------------------- match-e [39] 100.0% [56] 204(1.0%) 204(1.0%) filter ...t/collects/racket/private/list.rkt:256:2 ----------------------------------------------------------------------- match-e [39] 100.0% [57] 202(1.0%) 202(1.0%) constant? ...ck/herbie/src/syntax/syntax.rkt:221:0 ----------------------------------------------------------------------- atab-add-altn [42] 100.0% [58] 202(1.0%) 0(0.0%) override-at-pnts ...e/src/core/alt-table.rkt:145:0 errors [65] 100.0% ----------------------------------------------------------------------- match-e [39] 100.0% [59] 200(1.0%) 200(1.0%) custom-in-set ...acket/private/set-types.rkt:578:0 ----------------------------------------------------------------------- reduce-to-single! [49] 100.0% [60] 176(0.9%) 176(0.9%) for-loop ...tlock/herbie/src/core/egraph.rkt:325:8 ----------------------------------------------------------------------- loop [51] 24.8% loop [40] 75.2% [61] 3764(18.8%) 0(0.0%) make-exacts* ...tatlock/herbie/src/points.rkt:80:0 map [68] 58.3% loop [74] 41.7% ----------------------------------------------------------------------- update-leader! [50] 100.0% [62] 3366(16.8%) 202(1.0%) for-loop ...tlock/herbie/src/core/egraph.rkt:222:6 for-loop [69] 94.0% ----------------------------------------------------------------------- loop [40] 12.4% loop [51] 87.6% [63] 1578(7.9%) 0(0.0%) loop /home/ztatlock/herbie/src/points.rkt:83:4 map [68] 100.0% ----------------------------------------------------------------------- for-loop [52] 49.3% match-e [39] 50.7% [64] 1176(5.9%) 178(0.9%) for-loop ...tlock/herbie/src/core/ematch.rkt:65:37 match-e [39] 74.1% ??? [73] 18.4% ----------------------------------------------------------------------- override-at-pnts [58] 19.8% make-alt-table [34] 21.4% best-and-tied-at-points [53] 58.7% [65] 1018(5.1%) 0(0.0%) errors /home/ztatlock/herbie/src/points.rkt:144:0 eval-prog [70] 60.5% for-loop [72] 39.5% ----------------------------------------------------------------------- match-e [39] 12.6% list-cartesian-product [66] 37.6% for-loop [52] 49.9% [66] 804(4.0%) 402(2.0%) list-cartesian-product ...src/core/ematch.rkt:20:0 list-cartesian-product [66] 37.6% for-loop [71] 37.4% ----------------------------------------------------------------------- enode-merge! [55] 100.0% [67] 230(1.1%) 0(0.0%) adopt-enode! ...ock/herbie/src/core/enode.rkt:76:0 custom-set-union [88] 100.0% ----------------------------------------------------------------------- loop [63] 41.8% make-exacts* [61] 58.2% [68] 3772(18.8%) 0(0.0%) map ...acket/collects/racket/private/map.rkt:21:13 loop [74] 100.0% ----------------------------------------------------------------------- for-loop [62] 100.0% [69] 3164(15.8%) 0(0.0%) for-loop ...tlock/herbie/src/core/egraph.rkt:223:8 hash-update! [75] 100.0% ----------------------------------------------------------------------- errors [65] 100.0% [70] 616(3.1%) 616(3.1%) eval-prog ...tatlock/herbie/src/programs.rkt:162:0 ----------------------------------------------------------------------- list-cartesian-product [66] 100.0% [71] 402(2.0%) 402(2.0%) for-loop ...atlock/herbie/src/core/ematch.rkt:24:8 ----------------------------------------------------------------------- errors [65] 100.0% [72] 402(2.0%) 0(0.0%) for-loop ...e/ztatlock/herbie/src/points.rkt:147:4 ulp-difference [76] 50.2% ??? [77] 49.8% ----------------------------------------------------------------------- for-loop [64] 100.0% [73] 216(1.1%) 216(1.1%) ??? /home/ztatlock/herbie/src/core/ematch.rkt:50:5 ----------------------------------------------------------------------- make-exacts* [61] 0.0% ??? [77] 0.3% map [68] 0.4% loop! [81] 3.2% f94 [5] 3.3% loop [74] 92.7% [74] 6142(30.7%) 196(1.0%) loop ...cket/collects/racket/private/map.rkt:26:19 loop [74] 92.7% simplify [79] 3.3% loop! [81] 3.2% ??? [77] 0.4% for-loop [82] 0.1% ??? [103] 0.1% real->bigfloat [86] 0.0% ->flonum [80] 0.0% new [83] 0.0% ----------------------------------------------------------------------- for-loop [69] 100.0% [75] 3164(15.8%) 200(1.0%) hash-update! ...ket/private/more-scheme.rkt:362:13 ??? [78] 93.7% ----------------------------------------------------------------------- for-loop [72] 100.0% [76] 202(1.0%) 0(0.0%) ulp-difference ...atlock/herbie/src/float.rkt:19:0 ??? [84] 100.0% ----------------------------------------------------------------------- for-loop [72] 3.8% loop [74] 96.2% [77] 5314(26.5%) 0(0.0%) ??? /home/ztatlock/herbie/src/programs.rkt:168:4 loop [74] 35.2% real->bigfloat [86] 34.7% ??? [87] 25.9% ??? [103] 4.2% ----------------------------------------------------------------------- hash-update! [75] 100.0% [78] 2964(14.8%) 0(0.0%) ??? .../ztatlock/herbie/src/core/egraph.rkt:225:24 for-loop [85] 100.0% ----------------------------------------------------------------------- loop [74] 46.1% hash-ref! [26] 53.9% [79] 438(2.2%) 0(0.0%) simplify ...atlock/herbie/src/core/reduce.rkt:18:0 debug7 [89] 53.9% ??? [91] 46.1% ----------------------------------------------------------------------- loop [47] 46.2% loop [74] 53.8% [80] 424(2.1%) 0(0.0%) ->flonum ...ock/herbie/src/syntax/syntax.rkt:224:0 ??? [105] 100.0% ----------------------------------------------------------------------- for-loop [48] 15.6% merge-egraph-nodes! [41] 26.6% loop [74] 57.8% [81] 380(1.9%) 0(0.0%) loop! .../ztatlock/herbie/src/core/enode.rkt:163:2 loop [74] 57.8% update-en-expr [94] 26.6% custom-set-union [88] 15.6% ----------------------------------------------------------------------- loop [74] 100.0% [82] 218(1.1%) 0(0.0%) for-loop ...ock/herbie/src/core/simplify.rkt:161:2 setfindf [90] 100.0% ----------------------------------------------------------------------- loop [74] 100.0% [83] 204(1.0%) 204(1.0%) new ...cket/contract/private/case-arrow.rkt:227:53 ----------------------------------------------------------------------- ulp-difference [76] 100.0% [84] 202(1.0%) 202(1.0%) ??? /home/ztatlock/herbie/src/config.rkt:29:0 ----------------------------------------------------------------------- ??? [78] 100.0% [85] 2964(14.8%) 2764(13.8%) for-loop ...lock/herbie/src/core/egraph.rkt:226:26 update-en-expr [94] 6.7% ----------------------------------------------------------------------- loop [74] 35.3% ??? [77] 64.7% [86] 2848(14.2%) 2848(14.2%) real->bigfloat .../private/bigfloat/mpfr.rkt:451:0 ----------------------------------------------------------------------- ??? [77] 100.0% [87] 1378(6.9%) 200(1.0%) ??? ...acket/collects/racket/private/kw.rkt:400:14 bf* [92] 35.1% ...higher-order.rkt:373:33 [93] 32.4% ??? [98] 18.0% ----------------------------------------------------------------------- loop! [81] 43.6% adopt-enode! [67] 56.4% [88] 408(2.0%) 408(2.0%) custom-set-union ...et/private/set-types.rkt:168:0 ----------------------------------------------------------------------- simplify [79] 100.0% [89] 236(1.2%) 0(0.0%) debug7 /home/ztatlock/herbie/src/debug.rkt:102:0 ??? [95] 100.0% ----------------------------------------------------------------------- for-loop [82] 100.0% [90] 218(1.1%) 0(0.0%) setfindf ...e/ztatlock/herbie/src/common.rkt:173:0 for-loop [96] 100.0% ----------------------------------------------------------------------- simplify [79] 100.0% [91] 202(1.0%) 0(0.0%) ??? /home/ztatlock/herbie/src/core/reduce.rkt:52:5 for-loop [97] 100.0% ----------------------------------------------------------------------- ??? [87] 100.0% [92] 484(2.4%) 0(0.0%) bf* ...ath/private/bigfloat/bigfloat-mpfr.rkt:95:0 ??? [98] 100.0% ----------------------------------------------------------------------- ??? [87] 100.0% [93] 446(2.2%) 0(0.0%) ...higher-order.rkt:373:33 (unknown source) ??? [99] 100.0% ----------------------------------------------------------------------- for-loop [85] 49.8% loop! [81] 50.2% [94] 402(2.0%) 0(0.0%) update-en-expr ...herbie/src/core/egraph.rkt:211:0 for-loop [100] 100.0% ----------------------------------------------------------------------- debug7 [89] 100.0% [95] 236(1.2%) 0(0.0%) ??? ...racket/collects/racket/private/kw.rkt:713:9 ??? [101] 100.0% ----------------------------------------------------------------------- setfindf [90] 100.0% [96] 218(1.1%) 218(1.1%) for-loop ...e/ztatlock/herbie/src/common.rkt:174:2 ----------------------------------------------------------------------- ??? [91] 100.0% [97] 202(1.0%) 0(0.0%) for-loop ...atlock/herbie/src/core/reduce.rkt:53:7 pattern-match [102] 100.0% ----------------------------------------------------------------------- ??? [87] 33.9% bf* [92] 66.1% [98] 732(3.7%) 260(1.3%) ??? ...-racket/utils/simple-result-arrow.rkt:26:12 bfmul [104] 64.5% ----------------------------------------------------------------------- ...higher-order.rkt:373:33 [93]100.0% [99] 446(2.2%) 0(0.0%) ??? ...cts/racket/contract/private/list.rkt:187:10 ??? [103] 100.0% ----------------------------------------------------------------------- update-en-expr [94] 100.0% [100] 402(2.0%) 402(2.0%) for-loop ...tlock/herbie/src/core/egraph.rkt:213:6 ----------------------------------------------------------------------- ??? [95] 100.0% [101] 236(1.2%) 236(1.2%) ??? ...s/racket/contract/private/arr-i.rkt:1233:27 ----------------------------------------------------------------------- for-loop [97] 100.0% [102] 202(1.0%) 202(1.0%) pattern-match .../herbie/src/core/matcher.rkt:47:0 ----------------------------------------------------------------------- ??? [77] 19.6% ??? [99] 39.3% loop [74] 41.1% [103] 1134(5.7%) 0(0.0%) ??? ...ects/racket/contract/private/guts.rkt:638:8 ??? [105] 100.0% ----------------------------------------------------------------------- ??? [98] 100.0% [104] 472(2.4%) 472(2.4%) bfmul ...-lib/math/private/bigfloat/mpfr.rkt:819:4 ----------------------------------------------------------------------- ->flonum [80] 27.2% ??? [103] 72.8% [105] 1558(7.8%) 1558(7.8%) ??? ...tract/private/arrow-higher-order.rkt:373:33 -----------------------------------------------------------------------