read-num
w( "" "\x03\r\xcc8\xbd\\\xa1" "5.%\xf0\x8a$v%\x12\x93=9\xfb\x1b\xdd\x1d\xd4\xf0\xca" "9;\xce\x0f\xce\xb5\xb3\x1e\r\x8a\x1c\x12ki?\xc8\xa4\x9ak\xeb\xde\xc9{\xd4\x95\x8e\xbc=\x0b\x17\xa1\x8e\xab\xcc\xf8\xe1" )
get
256
base #(list to num)
digits
new-line
show-space
w( "\xae\xad\xa8\x82\x98\xb4\x80\x94" "\xe2\x94" "\xe2\x95" )
left-uncons
cartesian-product
3
drop
catenate #(list+list)
select