Profiling results ----------------- Total cpu time observed: 22164ms (out of 22656ms) Number of samples taken: 99 (once every 224ms) ======================================================================= Caller Idx Total Self Name+src Local% ms(pct) ms(pct) Callee ======================================================================= ??? [46] 100.0% [1] 20470(92.4%) 0(0.0%) profile-thunk14 ...t/pkgs/profile-lib/main.rkt:9:0 run [13] 100.0% ----------------------------------------------------------------------- ??? [46] 100.0% [2] 11034(49.8%) 0(0.0%) run-improve58 ...ock/herbie/src/mainloop.rkt:242:0 for-loop [14] 67.0% finalize-table! [18] 31.2% loop [49] 1.8% ----------------------------------------------------------------------- location-do [86] 100.0% [3] 5924(26.7%) 0(0.0%) approximate9 ...ck/herbie/src/core/taylor.rkt:11:0 loop [15] 96.6% taylor [23] 3.4% ----------------------------------------------------------------------- hash-ref! [77] 100.0% [4] 4708(21.2%) 0(0.0%) ??? .../ztatlock/herbie/src/core/taylor.rkt:295:23 for-loop [16] 100.0% ----------------------------------------------------------------------- hash-ref! [77] 100.0% [5] 3940(17.8%) 0(0.0%) ??? .../ztatlock/herbie/src/core/taylor.rkt:392:23 for-loop [17] 100.0% ----------------------------------------------------------------------- ??? [46] 100.0% [6] 3938(17.8%) 0(0.0%) simplify ...lock/herbie/src/core/simplify.rkt:39:0 simplify-expr [19] 52.3% iterate-egraph!5 [27] 26.9% for-loop [22] 20.9% ----------------------------------------------------------------------- hash-ref! [77] 100.0% [7] 1712(7.7%) 0(0.0%) ??? .../ztatlock/herbie/src/core/taylor.rkt:285:26 for-loop [20] 100.0% ----------------------------------------------------------------------- hash-ref! [77] 100.0% [8] 1018(4.6%) 0(0.0%) ??? .../ztatlock/herbie/src/core/taylor.rkt:483:23 for-loop [21] 100.0% ----------------------------------------------------------------------- hash-ref! [77] 100.0% [9] 448(2.0%) 0(0.0%) ??? /home/ztatlock/herbie/src/programs.rkt:197:5 loop [71] 100.0% ----------------------------------------------------------------------- loop [71] 100.0% [10] 424(1.9%) 0(0.0%) ??? ...ket/collects/racket/private/list.rkt:323:18 hash-ref! [77] 73.8% map [65] 26.2% ----------------------------------------------------------------------- loop [71] 100.0% [11] 374(1.7%) 0(0.0%) completely-simplify-alt ...erbie/src/glue.rkt:87:0 simplify-expr [19] 100.0% ----------------------------------------------------------------------- hash-ref! [77] 100.0% [12] 180(0.8%) 0(0.0%) ??? .../ztatlock/herbie/src/core/taylor.rkt:322:33 for-loop [24] 100.0% ----------------------------------------------------------------------- profile-thunk14 [1] 100.0% [13] 20470(92.4%) 0(0.0%) run ...share/racket/pkgs/profile-lib/main.rkt:31:2 ??? [46] 100.0% ----------------------------------------------------------------------- run-improve58 [2] 100.0% [14] 7396(33.4%) 0(0.0%) for-loop ...ztatlock/herbie/src/mainloop.rkt:253:8 run-iter! [25] 100.0% ----------------------------------------------------------------------- approximate9 [3] 100.0% [15] 5722(25.8%) 0(0.0%) loop ...e/ztatlock/herbie/src/core/taylor.rkt:82:4 hash-ref! [77] 100.0% ----------------------------------------------------------------------- ??? [4] 100.0% [16] 4708(21.2%) 0(0.0%) for-loop ...lock/herbie/src/core/taylor.rkt:298:27 hash-ref! [77] 100.0% ----------------------------------------------------------------------- ??? [5] 100.0% [17] 3940(17.8%) 0(0.0%) for-loop ...lock/herbie/src/core/taylor.rkt:396:33 for-loop [28] 100.0% ----------------------------------------------------------------------- run-improve58 [2] 100.0% [18] 3442(15.5%) 0(0.0%) finalize-table! ...k/herbie/src/mainloop.rkt:264:0 post-process [29] 100.0% ----------------------------------------------------------------------- completely-simplify-alt [11] 15.4% simplify [6] 84.6% [19] 2432(11.0%) 0(0.0%) simplify-expr ...herbie/src/core/simplify.rkt:68:0 iterate-egraph!5 [27] 100.0% ----------------------------------------------------------------------- ??? [7] 100.0% [20] 1712(7.7%) 0(0.0%) for-loop ...lock/herbie/src/core/taylor.rkt:285:52 hash-ref! [77] 100.0% ----------------------------------------------------------------------- ??? [8] 100.0% [21] 1018(4.6%) 0(0.0%) for-loop ...lock/herbie/src/core/taylor.rkt:487:35 parse-loop50 [68] 100.0% ----------------------------------------------------------------------- simplify [6] 100.0% [22] 822(3.7%) 0(0.0%) for-loop ...ock/herbie/src/core/simplify.rkt:61:12 iterate-egraph!5 [27] 100.0% ----------------------------------------------------------------------- approximate9 [3] 100.0% [23] 202(0.9%) 0(0.0%) taylor ...tatlock/herbie/src/core/taylor.rkt:157:0 debug-print [35] 100.0% ----------------------------------------------------------------------- ??? [12] 100.0% [24] 180(0.8%) 0(0.0%) for-loop ...lock/herbie/src/core/taylor.rkt:324:46 simplify [26] 100.0% ----------------------------------------------------------------------- for-loop [14] 100.0% [25] 7396(33.4%) 0(0.0%) run-iter! ...tatlock/herbie/src/mainloop.rkt:223:0 simplify! [31] 53.2% gen-series! [32] 41.0% localize-error [36] 5.7% ----------------------------------------------------------------------- for-loop [24] 3.1% hash-ref! [77] 96.9% [26] 5722(25.8%) 0(0.0%) simplify ...atlock/herbie/src/core/reduce.rkt:18:0 parse-loop50 [68] 66.1% f37 [34] 26.6% debug-print [35] 7.4% ----------------------------------------------------------------------- for-loop [22] 19.1% simplify [6] 24.5% simplify-expr [19] 56.4% [27] 4312(19.5%) 200(0.9%) iterate-egraph!5 ...bie/src/core/simplify.rkt:95:0 one-iter [30] 95.4% ----------------------------------------------------------------------- for-loop [17] 100.0% [28] 3940(17.8%) 0(0.0%) for-loop ...lock/herbie/src/core/taylor.rkt:398:39 hash-ref! [77] 100.0% ----------------------------------------------------------------------- finalize-table! [18] 100.0% [29] 3442(15.5%) 0(0.0%) post-process .../ztatlock/herbie/src/glue.rkt:95:0 for-loop [33] 84.0% loop [71] 10.9% ??? [37] 5.2% ----------------------------------------------------------------------- iterate-egraph!5 [27] 100.0% [30] 4112(18.6%) 0(0.0%) one-iter ...ock/herbie/src/core/simplify.rkt:106:0 for-loop [41] 69.8% loop [42] 25.3% apply-match [47] 4.9% ----------------------------------------------------------------------- run-iter! [25] 100.0% [31] 3938(17.8%) 0(0.0%) simplify! ...tatlock/herbie/src/mainloop.rkt:162:0 for-loop [38] 100.0% ----------------------------------------------------------------------- run-iter! [25] 100.0% [32] 3034(13.7%) 0(0.0%) gen-series! ...tlock/herbie/src/mainloop.rkt:134:0 for-loop [39] 100.0% ----------------------------------------------------------------------- post-process [29] 100.0% [33] 2890(13.0%) 0(0.0%) for-loop /home/ztatlock/herbie/src/glue.rkt:119:17 append-map [40] 100.0% ----------------------------------------------------------------------- map [65] 4.4% parse-loop50 [68] 4.4% loop [71] 12.4% simplify [26] 78.8% [34] 1520(6.9%) 558(2.5%) f37 ...t/collects/racket/match/compiler.rkt:499:40 map [65] 71.3% gather-multiplicative-terms [44] 4.4% ----------------------------------------------------------------------- taylor [23] 32.4% simplify [26] 67.6% [35] 624(2.8%) 422(1.9%) debug-print ...ztatlock/herbie/src/debug.rkt:107:0 for-loop [43] 32.4% ----------------------------------------------------------------------- run-iter! [25] 100.0% [36] 424(1.9%) 0(0.0%) localize-error ...erbie/src/core/localize.rkt:47:0 hash-ref! [77] 100.0% ----------------------------------------------------------------------- post-process [29] 100.0% [37] 178(0.8%) 0(0.0%) ??? ...contract/private/arrow-val-first.rkt:357:18 for-loop [45] 100.0% ----------------------------------------------------------------------- simplify! [31] 100.0% [38] 3938(17.8%) 0(0.0%) for-loop ...ztatlock/herbie/src/mainloop.rkt:166:6 ??? [46] 100.0% ----------------------------------------------------------------------- gen-series! [32] 100.0% [39] 3034(13.7%) 0(0.0%) for-loop ...ztatlock/herbie/src/mainloop.rkt:140:7 taylor-alt [78] 100.0% ----------------------------------------------------------------------- for-loop [33] 100.0% [40] 2890(13.0%) 0(0.0%) append-map ...acket/collects/racket/list.rkt:565:2 taylor-alt [78] 68.0% loop [71] 32.0% ----------------------------------------------------------------------- for-loop [41] 50.0% one-iter [30] 50.0% [41] 2870(12.9%) 992(4.5%) for-loop ...ck/herbie/src/core/simplify.rkt:116:12 for-loop [41] 50.0% match-e [50] 32.7% ----------------------------------------------------------------------- one-iter [30] 100.0% [42] 1042(4.7%) 0(0.0%) loop ...cket/collects/racket/private/map.rkt:53:19 apply-match [47] 100.0% ----------------------------------------------------------------------- debug-print [35] 100.0% [43] 202(0.9%) 202(0.9%) for-loop /home/ztatlock/herbie/src/debug.rkt:113:2 ----------------------------------------------------------------------- f37 [34] 100.0% [44] 200(0.9%) 0(0.0%) gather-multiplicative-terms ...re/reduce.rkt:107:0 map [65] 100.0% ----------------------------------------------------------------------- ??? [37] 100.0% [45] 178(0.8%) 0(0.0%) for-loop ...ock/herbie/src/core/alt-table.rkt:51:2 atab-add-altn [48] 100.0% ----------------------------------------------------------------------- for-loop [38] 6.5% run [13] 44.6% [46] 21722(98.0%) 0(0.0%) ??? ...lects/racket/private/more-scheme.rkt:261:28 profile-thunk14 [1] 44.6% loop [49] 25.1% run-improve58 [2] 23.8% simplify [6] 6.5% ----------------------------------------------------------------------- one-iter [30] 16.1% loop [42] 83.9% [47] 1242(5.6%) 200(0.9%) apply-match .../herbie/src/core/simplify.rkt:122:2 merge-egraph-nodes! [51] 51.7% match-e [50] 16.1% for-loop [52] 16.1% ----------------------------------------------------------------------- for-loop [45] 100.0% [48] 178(0.8%) 0(0.0%) atab-add-altn ...rbie/src/core/alt-table.rkt:208:0 best-and-tied-at-points [53] 100.0% ----------------------------------------------------------------------- run-improve58 [2] 1.8% ??? [46] 98.2% [49] 10884(49.1%) 0(0.0%) loop /home/ztatlock/herbie/src/points.rkt:122:2 loop [54] 49.9% make-exacts* [59] 36.0% loop [60] 14.0% ----------------------------------------------------------------------- apply-match [47] 4.8% for-loop [61] 10.1% for-loop [41] 85.1% [50] 2078(9.4%) 1020(4.6%) match-e ...tatlock/herbie/src/core/ematch.rkt:46:0 for-loop [55] 55.7% ----------------------------------------------------------------------- apply-match [47] 100.0% [51] 642(2.9%) 0(0.0%) merge-egraph-nodes! ...e/src/core/egraph.rkt:152:0 update-leader! [56] 62.6% for-loop [57] 37.4% ----------------------------------------------------------------------- apply-match [47] 100.0% [52] 200(0.9%) 0(0.0%) for-loop ...ck/herbie/src/core/simplify.rkt:136:10 loop! [80] 100.0% ----------------------------------------------------------------------- atab-add-altn [48] 100.0% [53] 178(0.8%) 0(0.0%) best-and-tied-at-points ...ore/alt-table.rkt:122:0 errors [58] 100.0% ----------------------------------------------------------------------- loop [49] 100.0% [54] 5434(24.5%) 0(0.0%) loop /home/ztatlock/herbie/src/points.rkt:93:2 loop [60] 63.0% make-exacts* [59] 32.9% eval-prog [66] 4.1% ----------------------------------------------------------------------- match-e [50] 100.0% [55] 1258(5.7%) 838(3.8%) for-loop ...tlock/herbie/src/core/ematch.rkt:59:11 for-loop [61] 33.4% ----------------------------------------------------------------------- merge-egraph-nodes! [51] 100.0% [56] 402(1.8%) 200(0.9%) update-leader! ...herbie/src/core/egraph.rkt:217:0 for-loop [63] 50.2% ----------------------------------------------------------------------- merge-egraph-nodes! [51] 100.0% [57] 240(1.1%) 0(0.0%) for-loop ...tlock/herbie/src/core/egraph.rkt:232:6 update-en-expr [62] 100.0% ----------------------------------------------------------------------- best-and-tied-at-points [53] 100.0% [58] 178(0.8%) 0(0.0%) errors /home/ztatlock/herbie/src/points.rkt:144:0 for-loop [64] 100.0% ----------------------------------------------------------------------- loop [54] 31.3% loop [49] 68.7% [59] 5710(25.8%) 0(0.0%) make-exacts* ...tatlock/herbie/src/points.rkt:80:0 loop [71] 51.8% map [65] 40.3% eval-prog [66] 7.8% ----------------------------------------------------------------------- loop [49] 30.9% loop [54] 69.1% [60] 4952(22.3%) 0(0.0%) loop /home/ztatlock/herbie/src/points.rkt:83:4 map [65] 100.0% ----------------------------------------------------------------------- for-loop [55] 100.0% [61] 420(1.9%) 220(1.0%) for-loop ...tlock/herbie/src/core/ematch.rkt:65:37 match-e [50] 73.8% ----------------------------------------------------------------------- for-loop [57] 100.0% [62] 240(1.1%) 240(1.1%) update-en-expr ...herbie/src/core/egraph.rkt:211:0 ----------------------------------------------------------------------- update-leader! [56] 100.0% [63] 202(0.9%) 0(0.0%) for-loop ...tlock/herbie/src/core/egraph.rkt:222:6 for-loop [67] 100.0% ----------------------------------------------------------------------- errors [58] 100.0% [64] 178(0.8%) 178(0.8%) for-loop ...e/ztatlock/herbie/src/points.rkt:147:4 ----------------------------------------------------------------------- gather-multiplicative-terms [44] 0.7% ??? [10] 2.3% f37 [34] 9.8% parse-loop50 [68] 13.6% make-exacts* [59] 23.4% loop [60] 50.3% [65] 9846(44.4%) 200(0.9%) map ...acket/collects/racket/private/map.rkt:21:13 loop [71] 73.8% parse-loop50 [68] 20.6% ->flonum [69] 2.3% ??? [76] 2.0% f37 [34] 0.7% ----------------------------------------------------------------------- loop [54] 33.1% make-exacts* [59] 66.9% [66] 670(3.0%) 222(1.0%) eval-prog ...tatlock/herbie/src/programs.rkt:162:0 hash-ref! [77] 66.9% ----------------------------------------------------------------------- for-loop [63] 100.0% [67] 202(0.9%) 0(0.0%) for-loop ...tlock/herbie/src/core/egraph.rkt:223:8 hash-update! [70] 100.0% ----------------------------------------------------------------------- for-loop [21] 7.1% hash-ref! [77] 7.4% loop [71] 9.2% map [65] 18.7% simplify [26] 25.1% parse-loop50 [68] 32.5% [68] 5724(25.8%) 4100(18.5%) parse-loop50 ...s/racket/match/compiler.rkt:410:15 parse-loop50 [68] 32.5% loop [71] 18.9% map [65] 8.9% for-loop [72] 7.1% parse-app [74] 3.8% f37 [34] 1.7% simplify* [73] 1.3% ----------------------------------------------------------------------- map [65] 100.0% [69] 222(1.0%) 0(0.0%) ->flonum ...ock/herbie/src/syntax/syntax.rkt:224:0 ??? [96] 100.0% ----------------------------------------------------------------------- for-loop [67] 100.0% [70] 202(0.9%) 0(0.0%) hash-update! ...ket/private/more-scheme.rkt:362:13 ??? [75] 100.0% ----------------------------------------------------------------------- make-exacts* [59] 0.2% post-process [29] 0.5% loop! [80] 1.4% ??? [9] 3.1% map [65] 4.3% append-map [40] 4.9% parse-loop50 [68] 11.5% loop [71] 74.2% [71] 14672(66.2%) 0(0.0%) loop ...cket/collects/racket/private/map.rkt:26:19 loop [71] 74.2% parse-loop50 [68] 12.1% taylor-alt [78] 4.9% hash-ref! [77] 3.1% f37 [34] 2.0% ??? [76] 1.7% loop! [80] 1.4% completely-simplify-alt [11] 0.5% ??? [10] 0.3% ...higher-order.rkt:373:33 [88] 0.1% ----------------------------------------------------------------------- parse-loop50 [68] 100.0% [72] 1018(4.6%) 0(0.0%) for-loop ...lock/herbie/src/core/taylor.rkt:490:59 hash-ref! [77] 100.0% ----------------------------------------------------------------------- parse-loop50 [68] 100.0% [73] 222(1.0%) 222(1.0%) simplify* ...tlock/herbie/src/core/reduce.rkt:23:0 ----------------------------------------------------------------------- parse-loop50 [68] 100.0% [74] 220(1.0%) 220(1.0%) parse-app .../collects/racket/private/kw.rkt:903:2 ----------------------------------------------------------------------- hash-update! [70] 100.0% [75] 202(0.9%) 0(0.0%) ??? .../ztatlock/herbie/src/core/egraph.rkt:225:24 for-loop [79] 100.0% ----------------------------------------------------------------------- map [65] 1.9% loop [71] 98.1% [76] 10214(46.1%) 222(1.0%) ??? /home/ztatlock/herbie/src/programs.rkt:168:4 ??? [81] 66.7% real->bigfloat [84] 26.4% ??? [94] 4.8% ----------------------------------------------------------------------- localize-error [36] 2.7% eval-prog [66] 2.8% for-loop [72] 3.1% ??? [10] 3.7% loop [71] 4.0% for-loop [20] 5.4% for-loop [28] 12.2% ??? [83] 19.7% loop [15] 22.7% for-loop [16] 23.6% [77] 6594(29.8%) 0(0.0%) hash-ref! ...racket/private/more-scheme.rkt:373:13 ??? [4] 23.6% simplify [26] 22.3% ??? [83] 19.7% ??? [5] 12.2% parse-loop50 [68] 6.4% ??? [7] 5.4% ??? [9] 4.0% ??? [8] 3.1% bigfloat-hash [85] 2.8% ??? [12] 0.5% ----------------------------------------------------------------------- loop [71] 15.6% append-map [40] 33.2% for-loop [39] 51.2% [78] 5924(26.7%) 0(0.0%) taylor-alt ...e/ztatlock/herbie/src/glue.rkt:142:0 for-loop [82] 100.0% ----------------------------------------------------------------------- ??? [75] 100.0% [79] 202(0.9%) 202(0.9%) for-loop ...lock/herbie/src/core/egraph.rkt:226:26 ----------------------------------------------------------------------- loop [71] 50.0% for-loop [52] 50.0% [80] 200(0.9%) 200(0.9%) loop! .../ztatlock/herbie/src/core/enode.rkt:163:2 loop [71] 50.0% ----------------------------------------------------------------------- ??? [76] 100.0% [81] 6810(30.7%) 0(0.0%) ??? ...acket/collects/racket/private/kw.rkt:400:14 ??? [91] 63.7% bf* [87] 20.4% ...higher-order.rkt:373:33 [88] 15.9% ----------------------------------------------------------------------- taylor-alt [78] 100.0% [82] 5924(26.7%) 0(0.0%) for-loop /home/ztatlock/herbie/src/glue.rkt:144:2 location-do [86] 100.0% ----------------------------------------------------------------------- hash-ref! [77] 100.0% [83] 5520(24.9%) 0(0.0%) ??? ...e/ztatlock/herbie/src/core/taylor.rkt:42:15 hash-ref! [77] 100.0% ----------------------------------------------------------------------- ??? [76] 100.0% [84] 2694(12.2%) 2044(9.2%) real->bigfloat .../private/bigfloat/mpfr.rkt:451:0 ??? [97] 24.1% ----------------------------------------------------------------------- hash-ref! [77] 100.0% [85] 448(2.0%) 0(0.0%) bigfloat-hash ...h/private/bigfloat/mpfr.rkt:165:0 bfcanonicalize [89] 54.0% sig+exp->bigfloat [90] 46.0% ----------------------------------------------------------------------- for-loop [82] 38.4% location-do [86] 61.6% [86] 5924(26.7%) 0(0.0%) location-do ...tlock/herbie/src/programs.rkt:129:0 location-do [86] 61.6% approximate9 [3] 38.4% ----------------------------------------------------------------------- ??? [81] 100.0% [87] 1390(6.3%) 0(0.0%) bf* ...ath/private/bigfloat/bigfloat-mpfr.rkt:95:0 ??? [91] 100.0% ----------------------------------------------------------------------- loop [71] 15.7% ??? [81] 84.3% [88] 1284(5.8%) 0(0.0%) ...higher-order.rkt:373:33 (unknown source) ??? [92] 100.0% ----------------------------------------------------------------------- bigfloat-hash [85] 100.0% [89] 242(1.1%) 242(1.1%) bfcanonicalize .../private/bigfloat/mpfr.rkt:155:0 ----------------------------------------------------------------------- bigfloat-hash [85] 100.0% [90] 206(0.9%) 206(0.9%) sig+exp->bigfloat ...ivate/bigfloat/mpfr.rkt:385:0 ----------------------------------------------------------------------- bf* [87] 24.3% ??? [81] 75.7% [91] 5728(25.8%) 902(4.1%) ??? ...-racket/utils/simple-result-arrow.rkt:26:12 bfadd [93] 45.5% ??? [96] 26.4% bfsqr [95] 12.4% ----------------------------------------------------------------------- ...higher-order.rkt:373:33 [88] 100.0% [92] 1284(5.8%) 202(0.9%) ??? ...cts/racket/contract/private/list.rkt:187:10 ??? [94] 84.3% ----------------------------------------------------------------------- ??? [91] 100.0% [93] 2608(11.8%) 1628(7.3%) bfadd ...-lib/math/private/bigfloat/mpfr.rkt:819:4 ??? [97] 37.6% ----------------------------------------------------------------------- ??? [76] 31.1% ??? [92] 68.9% [94] 1570(7.1%) 0(0.0%) ??? ...ects/racket/contract/private/guts.rkt:638:8 ??? [96] 100.0% ----------------------------------------------------------------------- ??? [91] 100.0% [95] 708(3.2%) 216(1.0%) bfsqr ...-lib/math/private/bigfloat/mpfr.rkt:616:4 ??? [97] 69.5% ----------------------------------------------------------------------- ->flonum [69] 6.7% ??? [91] 45.7% ??? [94] 47.5% [96] 3302(14.9%) 640(2.9%) ??? ...tract/private/arrow-higher-order.rkt:373:33 ??? [98] 73.7% ??? [99] 7.0% ----------------------------------------------------------------------- bfsqr [95] 23.2% real->bigfloat [84] 30.6% bfadd [93] 46.2% [97] 2122(9.6%) 2122(9.6%) ??? .../share/racket/collects/ffi/unsafe.rkt:861:4 ----------------------------------------------------------------------- ??? [96] 100.0% [98] 2432(11.0%) 666(3.0%) ??? ...llects/racket/contract/combinator.rkt:178:4 any-wrap/traverse [100] 72.6% ----------------------------------------------------------------------- ??? [96] 100.0% [99] 230(1.0%) 0(0.0%) ??? ...ects/racket/contract/private/prop.rkt:489:4 ??? [101] 100.0% ----------------------------------------------------------------------- ??? [98] 100.0% [100] 1766(8.0%) 1766(8.0%) any-wrap/traverse ...cket/utils/any-wrap.rkt:106:2 ----------------------------------------------------------------------- ??? [99] 100.0% [101] 230(1.0%) 230(1.0%) ??? ...lects/racket/contract/private/orc.rkt:73:14 -----------------------------------------------------------------------