show-line
inits
tail
m:
    3
    times #(list)
    3
    take-end
    extract-array
    rot
    -
    2
    =
        pop
        45
    f2
}
group
    head
m1