transpose -bytestring +text

transpose :: [Text] -> [Text]
text Data.Text, text Data.Text.Lazy
O(n) The transpose function transposes the rows and columns of its Text argument. Note that this function uses pack, unpack, and the list version of transpose, and is thus not very efficient.