line-mode
1
chunks
save-a
    sort #(list)
    push-a
        catenate #(list+list)
    z1
b4
26
times #(eval)
    left-uncons
    index
    inc
m3
    lcm
b1
fold