RosettaCodeData/Task/Matrix-transposition/Zkl/matrix-transposition-2.zkl
2017-09-25 22:28:19 +02:00

4 lines
121 B
Text

fcn transpose(M){
if(M.len()==1) M[0].pump(List,List.create); // 1 row --> n columns
else M[0].zip(M.xplode(1));
}