( "snidge" )
20
times #(list)
16
range1
m:
    2dup
    take
    show-line
    rrot
    drop