10
show
8
repeat-product
    sum
b1
sort #(list,block)
unlines