pop-a
w( "\xfb\xc3\xc2c\x03\x08" "\x1a\x02" "\xa17\x04" )
random
    inc
m1
right-uncons
0
rot
256
base #(list to num)
binary #(num to list)
catenate #(elem+list)
map-show
chunks
unlines