20 lines
336 B
Text
20 lines
336 B
Text
[ [] []
|
|
rot times
|
|
[ i join ]
|
|
dup size times
|
|
[ tuck
|
|
nested join
|
|
swap
|
|
behead join ]
|
|
drop
|
|
shuffle
|
|
transpose
|
|
shuffle ] is rls ( n --> [ )
|
|
|
|
2 times
|
|
[ 5 rls
|
|
witheach
|
|
[ witheach
|
|
[ echo sp ]
|
|
cr ]
|
|
cr ]
|