formatLines2  :: [[(String, Radiant)]] -> [[Chunk String]]
  formatLines2 = (transpose . formatLines2' . transpose)
formatLines2  :: [[(String, Radiant)]] -> [[Chunk String]]
formatLines2 = (transpose . formatLines2' . transpose)
formatLines2 = (transpose . formatLines2' . transpose)