read-num
binary #(num to list)
map-show