Profiling results ----------------- Total cpu time observed: 23142ms (out of 23536ms) Number of samples taken: 108 (once every 214ms) (Hiding functions with self<1.0% and local<2.0%: 1 of 104 hidden) ======================================================================= Caller Idx Total Self Name+src Local% ms(pct) ms(pct) Callee ======================================================================= ??? [31] 100.0% [1] 21958(94.9%) 0(0.0%) profile-thunk14 ...t/pkgs/profile-lib/main.rkt:9:0 run [6] 100.0% ----------------------------------------------------------------------- ??? [31] 100.0% [2] 17576(75.9%) 0(0.0%) run-improve58 ...ock/herbie/src/mainloop.rkt:242:0 for-loop [7] 98.9% setup-prog [12] 1.1% ----------------------------------------------------------------------- simplify-alt [17] 1.3% ??? [31] 98.7% [3] 15126(65.4%) 0(0.0%) simplify ...lock/herbie/src/core/simplify.rkt:39:0 simplify-expr [8] 58.6% iterate-egraph!5 [14] 21.0% for-loop [9] 20.4% ----------------------------------------------------------------------- hash-ref! [79] 100.0% [4] 634(2.7%) 0(0.0%) ??? .../ztatlock/herbie/src/core/taylor.rkt:285:26 for-loop [10] 100.0% ----------------------------------------------------------------------- hash-ref! [79] 100.0% [5] 634(2.7%) 0(0.0%) ??? .../ztatlock/herbie/src/core/taylor.rkt:322:33 for-loop [11] 100.0% ----------------------------------------------------------------------- profile-thunk14 [1] 100.0% [6] 21958(94.9%) 0(0.0%) run ...share/racket/pkgs/profile-lib/main.rkt:31:2 ??? [31] 100.0% ----------------------------------------------------------------------- run-improve58 [2] 100.0% [7] 17376(75.1%) 0(0.0%) for-loop ...ztatlock/herbie/src/mainloop.rkt:253:8 run-iter! [13] 100.0% ----------------------------------------------------------------------- simplify [3] 100.0% [8] 8862(38.3%) 0(0.0%) simplify-expr ...herbie/src/core/simplify.rkt:68:0 iterate-egraph!5 [14] 97.8% loop [16] 2.2% ----------------------------------------------------------------------- simplify [3] 100.0% [9] 3082(13.3%) 0(0.0%) for-loop ...ock/herbie/src/core/simplify.rkt:61:12 iterate-egraph!5 [14] 94.0% loop [16] 6.0% ----------------------------------------------------------------------- ??? [4] 100.0% [10] 634(2.7%) 0(0.0%) for-loop ...lock/herbie/src/core/taylor.rkt:285:52 hash-ref! [79] 100.0% ----------------------------------------------------------------------- ??? [5] 100.0% [11] 634(2.7%) 0(0.0%) for-loop ...lock/herbie/src/core/taylor.rkt:324:46 simplify [15] 100.0% ----------------------------------------------------------------------- run-improve58 [2] 100.0% [12] 200(0.9%) 0(0.0%) setup-prog /home/ztatlock/herbie/src/glue.rkt:46:0 simplify-alt [17] 100.0% ----------------------------------------------------------------------- for-loop [7] 100.0% [13] 17376(75.1%) 0(0.0%) run-iter! ...tatlock/herbie/src/mainloop.rkt:223:0 simplify! [18] 87.0% gen-series! [20] 8.4% finalize-iter! [21] 4.6% ----------------------------------------------------------------------- for-loop [9] 19.6% simplify [3] 21.6% simplify-expr [8] 58.8% [14] 14746(63.7%) 0(0.0%) iterate-egraph!5 ...bie/src/core/simplify.rkt:95:0 one-iter [19] 97.5% map-enodes [23] 2.5% ----------------------------------------------------------------------- loop [74] 23.2% for-loop [11] 76.8% [15] 826(3.6%) 0(0.0%) simplify ...atlock/herbie/src/core/reduce.rkt:18:0 f94 [66] 76.8% debug-print [24] 23.2% ----------------------------------------------------------------------- for-loop [9] 48.9% simplify-expr [8] 51.1% [16] 380(1.6%) 0(0.0%) loop ...tatlock/herbie/src/core/simplify.rkt:203:2 pass [22] 100.0% ----------------------------------------------------------------------- setup-prog [12] 100.0% [17] 200(0.9%) 0(0.0%) simplify-alt .../ztatlock/herbie/src/glue.rkt:84:0 simplify [3] 100.0% ----------------------------------------------------------------------- run-iter! [13] 100.0% [18] 15120(65.3%) 0(0.0%) simplify! ...tatlock/herbie/src/mainloop.rkt:162:0 for-loop [25] 100.0% ----------------------------------------------------------------------- iterate-egraph!5 [14] 100.0% [19] 14374(62.1%) 222(1.0%) one-iter ...ock/herbie/src/core/simplify.rkt:106:0 loop [26] 57.6% for-loop [27] 39.4% ----------------------------------------------------------------------- run-iter! [13] 100.0% [20] 1460(6.3%) 0(0.0%) gen-series! ...tlock/herbie/src/mainloop.rkt:134:0 for-loop [28] 100.0% ----------------------------------------------------------------------- run-iter! [13] 100.0% [21] 796(3.4%) 0(0.0%) finalize-iter! ...ck/herbie/src/mainloop.rkt:177:0 ??? [29] 100.0% ----------------------------------------------------------------------- loop [16] 100.0% [22] 380(1.6%) 0(0.0%) pass ...tatlock/herbie/src/core/simplify.rkt:193:2 for-loop [30] 100.0% ----------------------------------------------------------------------- iterate-egraph!5 [14] 100.0% [23] 372(1.6%) 0(0.0%) map-enodes ...ock/herbie/src/core/egraph.rkt:139:0 loop [74] 100.0% ----------------------------------------------------------------------- simplify [15] 100.0% [24] 192(0.8%) 192(0.8%) debug-print ...ztatlock/herbie/src/debug.rkt:107:0 ----------------------------------------------------------------------- simplify! [18] 100.0% [25] 15120(65.3%) 0(0.0%) for-loop ...ztatlock/herbie/src/mainloop.rkt:166:6 ??? [31] 98.7% foldl [36] 1.3% ----------------------------------------------------------------------- one-iter [19] 100.0% [26] 8286(35.8%) 0(0.0%) loop ...cket/collects/racket/private/map.rkt:53:19 apply-match [32] 100.0% ----------------------------------------------------------------------- for-loop [27] 50.0% one-iter [19] 50.0% [27] 5668(24.5%) 942(4.1%) for-loop ...ck/herbie/src/core/simplify.rkt:116:12 for-loop [27] 50.0% match-e [38] 41.7% ----------------------------------------------------------------------- gen-series! [20] 100.0% [28] 1460(6.3%) 0(0.0%) for-loop ...ztatlock/herbie/src/mainloop.rkt:140:7 taylor-alt [33] 100.0% ----------------------------------------------------------------------- finalize-iter! [21] 100.0% [29] 796(3.4%) 0(0.0%) ??? ...contract/private/arrow-val-first.rkt:357:18 for-loop [34] 75.4% atab-add-altns [35] 24.6% ----------------------------------------------------------------------- pass [22] 100.0% [30] 380(1.6%) 194(0.8%) for-loop ...ck/herbie/src/core/simplify.rkt:196:29 loop [37] 48.9% ----------------------------------------------------------------------- for-loop [25] 22.4% run [6] 37.5% [31] 23142(100.0%) 0(0.0%) ??? ...lects/racket/private/more-scheme.rkt:261:28 profile-thunk14 [1] 37.5% run-improve58 [2] 28.1% simplify [3] 22.4% loop [39] 12.0% ----------------------------------------------------------------------- loop [26] 100.0% [32] 8286(35.8%) 378(1.6%) apply-match .../herbie/src/core/simplify.rkt:122:2 merge-egraph-nodes! [40] 37.7% match-e [38] 23.4% for-loop [41] 18.3% mk-enode! [62] 7.0% loop! [78] 6.9% substitute-e [53] 2.1% ----------------------------------------------------------------------- for-loop [28] 100.0% [33] 1460(6.3%) 0(0.0%) taylor-alt ...e/ztatlock/herbie/src/glue.rkt:142:0 for-loop [42] 100.0% ----------------------------------------------------------------------- ??? [29] 100.0% [34] 600(2.6%) 0(0.0%) for-loop ...ock/herbie/src/core/alt-table.rkt:51:2 atab-add-altn [43] 100.0% ----------------------------------------------------------------------- ??? [29] 100.0% [35] 196(0.8%) 0(0.0%) atab-add-altns ...rbie/src/core/alt-table.rkt:50:0 atab-add-altn [43] 100.0% ----------------------------------------------------------------------- for-loop [25] 100.0% [36] 194(0.8%) 0(0.0%) foldl ...et/collects/racket/private/list.rkt:229:4 ??? [44] 100.0% ----------------------------------------------------------------------- for-loop [30] 100.0% [37] 186(0.8%) 0(0.0%) loop ...hare/racket/collects/racket/list.rkt:729:4 expression-cost [45] 100.0% ----------------------------------------------------------------------- for-loop [57] 15.1% apply-match [32] 20.1% for-loop [27] 64.7% [38] 6668(28.8%) 2344(10.1%) match-e ...tatlock/herbie/src/core/ematch.rkt:46:0 for-loop [46] 49.1% for-loop [57] 16.1% list-cartesian-product [61] 4.5% ----------------------------------------------------------------------- ??? [31] 100.0% [39] 5566(24.1%) 0(0.0%) loop /home/ztatlock/herbie/src/points.rkt:122:2 make-exacts* [56] 55.0% loop [47] 45.0% ----------------------------------------------------------------------- for-loop [52] 2.9% apply-match [32] 97.1% [40] 3120(13.5%) 0(0.0%) merge-egraph-nodes! ...e/src/core/egraph.rkt:152:0 update-leader! [48] 75.4% loop! [78] 9.2% for-loop [52] 8.6% for-loop [54] 6.8% ----------------------------------------------------------------------- apply-match [32] 100.0% [41] 1518(6.6%) 0(0.0%) for-loop ...ck/herbie/src/core/simplify.rkt:136:10 loop! [78] 75.9% mk-enode! [62] 12.5% substitute-e [53] 11.6% ----------------------------------------------------------------------- taylor-alt [33] 100.0% [42] 1460(6.3%) 0(0.0%) for-loop /home/ztatlock/herbie/src/glue.rkt:144:2 location-do [49] 100.0% ----------------------------------------------------------------------- atab-add-altns [35] 24.6% for-loop [34] 75.4% [43] 796(3.4%) 0(0.0%) atab-add-altn ...rbie/src/core/alt-table.rkt:208:0 override-at-pnts [50] 50.3% best-and-tied-at-points [51] 49.7% ----------------------------------------------------------------------- foldl [36] 100.0% [44] 194(0.8%) 194(0.8%) ??? /home/ztatlock/herbie/src/alternative.rkt:64:9 ----------------------------------------------------------------------- loop [37] 100.0% [45] 186(0.8%) 0(0.0%) expression-cost ...k/herbie/src/programs.rkt:212:0 compile [55] 100.0% ----------------------------------------------------------------------- match-e [38] 100.0% [46] 3920(16.9%) 2122(9.2%) for-loop ...tlock/herbie/src/core/ematch.rkt:59:11 for-loop [57] 28.2% list-cartesian-product [61] 20.5% ----------------------------------------------------------------------- loop [39] 100.0% [47] 2506(10.8%) 0(0.0%) loop /home/ztatlock/herbie/src/points.rkt:93:2 loop [59] 60.5% make-exacts* [56] 39.5% ----------------------------------------------------------------------- merge-egraph-nodes! [40] 100.0% [48] 2354(10.2%) 356(1.5%) update-leader! ...herbie/src/core/egraph.rkt:217:0 for-loop [58] 84.9% ----------------------------------------------------------------------- for-loop [42] 46.7% location-do [49] 53.3% [49] 1460(6.3%) 0(0.0%) location-do ...tlock/herbie/src/programs.rkt:129:0 location-do [49] 53.3% approximate9 [60] 46.7% ----------------------------------------------------------------------- atab-add-altn [43] 100.0% [50] 400(1.7%) 0(0.0%) override-at-pnts ...e/src/core/alt-table.rkt:145:0 errors [63] 100.0% ----------------------------------------------------------------------- atab-add-altn [43] 100.0% [51] 396(1.7%) 0(0.0%) best-and-tied-at-points ...ore/alt-table.rkt:122:0 for-loop [64] 50.5% errors [63] 49.5% ----------------------------------------------------------------------- merge-egraph-nodes! [40] 100.0% [52] 356(1.5%) 0(0.0%) for-loop ...lock/herbie/src/core/egraph.rkt:200:10 loop! [78] 50.0% merge-egraph-nodes! [40] 50.0% ----------------------------------------------------------------------- for-loop [41] 49.7% apply-match [32] 50.3% [53] 354(1.5%) 0(0.0%) substitute-e ...ck/herbie/src/core/ematch.rkt:71:0 mk-enode! [62] 100.0% ----------------------------------------------------------------------- merge-egraph-nodes! [40] 100.0% [54] 212(0.9%) 212(0.9%) for-loop ...tlock/herbie/src/core/egraph.rkt:232:6 ----------------------------------------------------------------------- expression-cost [45] 100.0% [55] 186(0.8%) 0(0.0%) compile .../ztatlock/herbie/src/programs.rkt:189:0 hash-ref! [79] 100.0% ----------------------------------------------------------------------- loop [47] 24.4% loop [39] 75.6% [56] 4050(17.5%) 0(0.0%) make-exacts* ...tatlock/herbie/src/points.rkt:80:0 loop [74] 50.1% map [70] 49.9% ----------------------------------------------------------------------- for-loop [46] 44.1% match-e [38] 55.9% [57] 2756(11.9%) 1004(4.3%) for-loop ...tlock/herbie/src/core/ematch.rkt:65:37 match-e [38] 67.2% ----------------------------------------------------------------------- update-leader! [48] 100.0% [58] 1998(8.6%) 214(0.9%) for-loop ...tlock/herbie/src/core/egraph.rkt:222:6 for-loop [65] 89.3% ----------------------------------------------------------------------- loop [47] 100.0% [59] 1516(6.6%) 0(0.0%) loop /home/ztatlock/herbie/src/points.rkt:83:4 map [70] 100.0% ----------------------------------------------------------------------- location-do [49] 100.0% [60] 1460(6.3%) 0(0.0%) approximate9 ...ck/herbie/src/core/taylor.rkt:11:0 loop [67] 86.8% f94 [66] 13.2% ----------------------------------------------------------------------- match-e [38] 16.5% list-cartesian-product [61] 24.1% for-loop [46] 59.3% [61] 1198(5.2%) 1198(5.2%) list-cartesian-product ...src/core/ematch.rkt:20:0 list-cartesian-product [61] 24.1% ----------------------------------------------------------------------- for-loop [41] 16.9% substitute-e [53] 31.6% apply-match [32] 51.5% [62] 1122(4.8%) 1122(4.8%) mk-enode! ...lock/herbie/src/core/egraph.rkt:101:0 ----------------------------------------------------------------------- best-and-tied-at-points [51] 32.9% override-at-pnts [50] 67.1% [63] 596(2.6%) 0(0.0%) errors /home/ztatlock/herbie/src/points.rkt:144:0 for-loop [68] 66.4% eval-prog [69] 33.6% ----------------------------------------------------------------------- best-and-tied-at-points [51] 100.0% [64] 200(0.9%) 200(0.9%) for-loop ...k/herbie/src/core/alt-table.rkt:124:16 ----------------------------------------------------------------------- for-loop [58] 100.0% [65] 1784(7.7%) 0(0.0%) for-loop ...tlock/herbie/src/core/egraph.rkt:223:8 hash-update! [71] 100.0% ----------------------------------------------------------------------- f94 [66] 2.6% approximate9 [60] 2.6% map [70] 7.9% hash-ref! [79] 43.4% simplify [15] 43.4% [66] 1460(6.3%) 634(2.7%) f94 ...t/collects/racket/match/compiler.rkt:499:40 taylor [72] 46.1% map [70] 7.9% f94 [66] 2.6% ----------------------------------------------------------------------- approximate9 [60] 100.0% [67] 1268(5.5%) 0(0.0%) loop ...e/ztatlock/herbie/src/core/taylor.rkt:82:4 hash-ref! [79] 100.0% ----------------------------------------------------------------------- errors [63] 100.0% [68] 396(1.7%) 0(0.0%) for-loop ...e/ztatlock/herbie/src/points.rkt:147:4 ulp-difference [73] 50.5% ??? [77] 49.5% ----------------------------------------------------------------------- errors [63] 100.0% [69] 200(0.9%) 0(0.0%) eval-prog ...tatlock/herbie/src/programs.rkt:162:0 hash-ref! [79] 100.0% ----------------------------------------------------------------------- f94 [66] 5.1% loop [59] 40.6% make-exacts* [56] 54.2% [70] 3730(16.1%) 0(0.0%) map ...acket/collects/racket/private/map.rkt:21:13 loop [74] 87.8% ??? [77] 7.0% f94 [66] 5.1% ----------------------------------------------------------------------- for-loop [65] 100.0% [71] 1784(7.7%) 212(0.9%) hash-update! ...ket/private/more-scheme.rkt:362:13 ??? [75] 88.1% ----------------------------------------------------------------------- f94 [66] 100.0% [72] 826(3.6%) 0(0.0%) taylor ...tatlock/herbie/src/core/taylor.rkt:157:0 debug7 [76] 76.8% loop [74] 23.2% ----------------------------------------------------------------------- for-loop [68] 100.0% [73] 200(0.9%) 200(0.9%) ulp-difference ...atlock/herbie/src/float.rkt:19:0 ----------------------------------------------------------------------- ??? [77] 0.0% make-exacts* [56] 0.1% map [70] 0.3% map-enodes [23] 1.9% taylor [72] 2.4% ??? [89] 2.4% loop! [78] 7.4% loop [74] 85.5% [74] 8168(35.3%) 200(0.9%) loop ...cket/collects/racket/private/map.rkt:26:19 loop [74] 85.5% loop! [78] 7.4% simplify [15] 2.4% hash-ref! [79] 2.0% for-loop [81] 1.9% ??? [77] 0.3% real->bigfloat [82] 0.0% ----------------------------------------------------------------------- hash-update! [71] 100.0% [75] 1572(6.8%) 0(0.0%) ??? .../ztatlock/herbie/src/core/egraph.rkt:225:24 for-loop [80] 100.0% ----------------------------------------------------------------------- taylor [72] 100.0% [76] 634(2.7%) 634(2.7%) debug7 /home/ztatlock/herbie/src/debug.rkt:102:0 ----------------------------------------------------------------------- for-loop [68] 3.4% map [70] 4.5% loop [74] 92.1% [77] 5762(24.9%) 706(3.1%) ??? /home/ztatlock/herbie/src/programs.rkt:168:4 real->bigfloat [82] 40.0% ??? [83] 35.2% ??? [100] 8.4% loop [74] 4.2% ----------------------------------------------------------------------- for-loop [52] 7.8% merge-egraph-nodes! [40] 8.3% apply-match [32] 12.6% for-loop [41] 25.3% loop [74] 46.1% [78] 2278(9.8%) 1142(4.9%) loop! .../ztatlock/herbie/src/core/enode.rkt:163:2 loop [74] 46.1% set [85] 17.0% custom-set-union [90] 7.8% update-en-expr [87] 4.0% ----------------------------------------------------------------------- eval-prog [69] 2.4% ??? [86] 4.8% loop [74] 9.7% compile [55] 11.2% loop [67] 14.4% for-loop [10] 14.4% ??? [84] 43.1% [79] 1654(7.1%) 186(0.8%) hash-ref! ...racket/private/more-scheme.rkt:373:13 ??? [84] 43.1% ??? [4] 14.4% ??? [89] 12.1% f94 [66] 9.6% ??? [86] 4.8% ??? [5] 4.8% ----------------------------------------------------------------------- ??? [75] 100.0% [80] 1572(6.8%) 1172(5.1%) for-loop ...lock/herbie/src/core/egraph.rkt:226:26 update-en-expr [87] 25.4% ----------------------------------------------------------------------- loop [74] 100.0% [81] 372(1.6%) 0(0.0%) for-loop ...ock/herbie/src/core/simplify.rkt:161:2 setfindf [88] 100.0% ----------------------------------------------------------------------- loop [74] 9.5% ??? [77] 90.5% [82] 2544(11.0%) 2050(8.9%) real->bigfloat .../private/bigfloat/mpfr.rkt:451:0 ??? [93] 19.4% ----------------------------------------------------------------------- ??? [77] 100.0% [83] 2026(8.8%) 0(0.0%) ??? ...acket/collects/racket/private/kw.rkt:400:14 ...higher-order.rkt:373:33 [91] 50.4% ??? [92] 49.6% ----------------------------------------------------------------------- hash-ref! [79] 100.0% [84] 1268(5.5%) 0(0.0%) ??? ...e/ztatlock/herbie/src/core/taylor.rkt:63:15 hash-ref! [79] 100.0% ----------------------------------------------------------------------- loop! [78] 100.0% [85] 776(3.4%) 776(3.4%) set ...collects/racket/private/set-types.rkt:982:0 ----------------------------------------------------------------------- hash-ref! [79] 100.0% [86] 634(2.7%) 0(0.0%) ??? ...e/ztatlock/herbie/src/core/taylor.rkt:42:15 hash-ref! [79] 100.0% ----------------------------------------------------------------------- loop! [78] 31.3% for-loop [80] 68.7% [87] 582(2.5%) 382(1.7%) update-en-expr ...herbie/src/core/egraph.rkt:211:0 for-loop [94] 34.4% ----------------------------------------------------------------------- for-loop [81] 100.0% [88] 372(1.6%) 184(0.8%) setfindf ...e/ztatlock/herbie/src/common.rkt:173:0 for-loop [95] 50.5% ----------------------------------------------------------------------- hash-ref! [79] 100.0% [89] 200(0.9%) 0(0.0%) ??? /home/ztatlock/herbie/src/programs.rkt:197:5 loop [74] 100.0% ----------------------------------------------------------------------- loop! [78] 100.0% [90] 178(0.8%) 0(0.0%) custom-set-union ...et/private/set-types.rkt:168:0 for-loop [96] 100.0% ----------------------------------------------------------------------- ??? [83] 100.0% [91] 1022(4.4%) 0(0.0%) ...higher-order.rkt:373:33 (unknown source) ??? [97] 100.0% ----------------------------------------------------------------------- ??? [83] 100.0% [92] 1004(4.3%) 0(0.0%) ??? ...-racket/utils/simple-result-arrow.rkt:26:12 bfadd [98] 100.0% ----------------------------------------------------------------------- real->bigfloat [82] 100.0% [93] 494(2.1%) 494(2.1%) ??? .../share/racket/collects/ffi/unsafe.rkt:861:4 ----------------------------------------------------------------------- update-en-expr [87] 100.0% [94] 200(0.9%) 200(0.9%) for-loop ...tlock/herbie/src/core/egraph.rkt:213:6 ----------------------------------------------------------------------- setfindf [88] 100.0% [95] 188(0.8%) 188(0.8%) for-loop ...e/ztatlock/herbie/src/common.rkt:174:2 ----------------------------------------------------------------------- custom-set-union [90] 100.0% [96] 178(0.8%) 0(0.0%) for-loop ...cts/racket/private/set-types.rkt:174:3 for-loop [99] 100.0% ----------------------------------------------------------------------- ...higher-order.rkt:373:33 [91]100.0% [97] 1022(4.4%) 232(1.0%) ??? ...cts/racket/contract/private/list.rkt:187:10 ??? [100] 77.3% ----------------------------------------------------------------------- ??? [92] 100.0% [98] 1004(4.3%) 1004(4.3%) bfadd ...-lib/math/private/bigfloat/mpfr.rkt:819:4 ----------------------------------------------------------------------- for-loop [96] 100.0% [99] 178(0.8%) 178(0.8%) for-loop ...cts/racket/private/set-types.rkt:178:5 ----------------------------------------------------------------------- ??? [77] 38.1% ??? [97] 61.9% [100] 1276(5.5%) 0(0.0%) ??? ...ects/racket/contract/private/guts.rkt:638:8 ??? [101] 100.0% ----------------------------------------------------------------------- ??? [100] 100.0% [101] 1276(5.5%) 750(3.2%) ??? ...tract/private/arrow-higher-order.rkt:373:33 ??? [102] 41.2% ----------------------------------------------------------------------- ??? [101] 100.0% [102] 526(2.3%) 0(0.0%) ??? ...llects/racket/contract/combinator.rkt:178:4 any-wrap/traverse [103] 100.0% ----------------------------------------------------------------------- ??? [102] 100.0% [103] 526(2.3%) 526(2.3%) any-wrap/traverse ...cket/utils/any-wrap.rkt:106:2 -----------------------------------------------------------------------