stdin slurp-fid 32 2 pick 8 + c! 2 base ! evaluate * 0 <<# # # # # # # # # #> type