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