10
range1
reverse
m:
    dup2
    "#"
    times #(list)
    rrot
    even
    *
    9
    +
    rjust
    show-line
    @5
    times #(list)