Category:Initlib: Difference between revisions
no edit summary
(transpose) |
No edit summary |
||
Line 85:
[ rup [ /dup rdown /exec /not [{pop}] aif ] atox forall ]
end}.
/transpose {
Line 98 ⟶ 92:
} loop ] {reverse} map
}.
/zip {transpose}.
% [[1 2 3 4 ] [5 6 7 8] [9 10 11 12]] transpose
/all? {
|