Another update from ingydotnet^djgoku
This commit is contained in:
parent
91df62d461
commit
948b86eafa
7604 changed files with 108452 additions and 22726 deletions
|
|
@ -2,7 +2,8 @@
|
|||
/transpose {
|
||||
[ exch {
|
||||
{ {empty? exch pop} map all?} {pop exit} ift
|
||||
[ exch {} {uncons {exch cons} dip exch} fold counttomark 1 roll] uncons
|
||||
[ exch {} {uncons {exch cons} dip exch} fold counttomark 1 roll]
|
||||
uncons
|
||||
} loop ] {reverse} map
|
||||
}.
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue