RosettaCodeData/Task/Matrix-transposition/Factor/matrix-transposition.factor

( scratchpad ) { { 1 2 3 } { 4 5 6 } } flip .
 { { 1 4 } { 2 5 } { 3 6 } }