82.828% user: @
 29.694% @ ;s
 19.697% ;s ;s
 73.316% var: @
  8.562% col: lit
 29.054% dup ?branch
 19.431% ?branch lit
 97.952% = ?branch
 61.813% ! ;s
 26.762% + swap
 86.391% +! ;s
 96.373% field: @
 14.683% lit and
 61.115% rot +
 52.961% c@ ;s
 97.754% <> ?branch
 51.503% and 0=
 33.513% 0= ?branch
 19.322% swap ;s
100.000% lshift ;s
 21.389% con: /mod
 48.174% cells rot
 79.940% /mod cells
 64.318% >l lp-
 66.106% c! ;s
 94.764% lp- @local1
100.000% um/mod r>
 28.837% over c@
 97.044% > ?branch
 15.152% r> ;s
 89.335% 1+ r>
 32.373% r@ lit
 27.516% branch lit
 74.812% ?dup ?branch
 73.902% lp+ ;s
 37.590% count lit
 10.697% >r >r
 19.854% 2dup +
 36.627% - 1+
 76.901% xor cells
100.000% (hashkey1) ;s
 30.210% i 2@
 71.800% 2@ over
 43.370% /string branch
100.000% (hashfind) ;s
 19.189% @local1 @
 27.737% cell+ @local1
 60.204% aligned >r
 76.769% (parse-white) 2dup
 60.975% unloop ;s
 46.433% 2drop ;s
 40.087% nip nip
 20.625% defer: (type)
 46.608% does: @
 96.057% or swap
 81.080% faligned ;s
 88.380% rdrop ;s
 66.558% (+loop) 2dup
 68.039% (type) ;s
 67.441% 1- cells
 63.637% (do) 2dup
 92.001% 0> ?branch
 18.405% (loop) unloop
 13.240% drop ;s
 49.680% @local0 >l
 54.603% 0< ?branch
 63.858% @local3 =
 21.771% min /string
 31.398% pick !
 61.133% move c!
 39.288% (?do) unloop
100.000% lp+!# ;s
 82.346% negate ;s
100.000% d0= ?branch
 97.350% < ?branch
 87.189% lp+2 ;s
 48.290% max lit
100.000% (f83find) ;s
 99.960% rshift ;s
100.000% fill ;s
 27.775% tuck cell+
 91.185% >body nip
100.000% i' i
 99.786% >code-address ;s
100.000% code-address! ;s
 57.420% u> lit
 48.651% @local# @local1
 77.723% ?branch-lp+!# >l
 57.924% 2! ;s
100.000% u>= ?branch
100.000% toupper lit
 36.996% um* drop
100.000% d+ r>
 18.813% write-file ?dup
 44.312% @local2 i
 46.327% 0<> ?branch
100.000% u< ?branch
 84.392% * swap
 68.317% 2swap dup
100.000% does-code! ;s
 97.824% /does-handler +
 18.702% cr ;s
100.000% (s+loop) dup
 99.760% 2* cells
100.000% 2rdrop branch
 49.903% noop ;s
100.000% d<> ?branch
  4.177% / ;s
  2.385% sp@ cell+
  0.609% execute or
100.000% dnegate r>
 40.580% (emit) ;s
100.000% d>s ;s
 80.533% >= ?branch
100.000% within 0=
 95.758% floats over
 80.745% invert and
 78.049% laddr# ;s
  0.556% fp@ >r
 97.531% open-file 0=
 33.761% cmove 2dup
100.000% u<= ?branch
100.000% <= ?branch
100.000% u<> ?branch
 86.420% -rot move
 23.140% char+ c@
 57.143% compare 0=
100.000% 2over compare
 90.909% close-file swap
100.000% does-handler! ;s
100.000% read-file ?branch
100.000% >float ?branch
100.000% f! ;s
100.000% >does-code lit
100.000% up! sp@
 66.667% create-file ;s
100.000% sfloats ;s
100.000% float+ dup
100.000% fasin ;s
100.000% f* ;s
100.000% dfloats ;s
100.000% mod ;s
 25.000% (next) unloop
 33.764% static prediction accuracy