From 4709700840afde45a34144b8843a16be7d5d2b37 Mon Sep 17 00:00:00 2001 From: karchnu Date: Fri, 8 Jan 2016 04:36:57 +0100 Subject: [PATCH] dot syntax --- haskell/columnv2.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/haskell/columnv2.hs b/haskell/columnv2.hs index 9908872..cef6d18 100644 --- a/haskell/columnv2.hs +++ b/haskell/columnv2.hs @@ -12,7 +12,7 @@ completeMatrix m = map (\e -> e ++ [""| _ <- [length e..nb]]) m where nb = maximum $ map length m column :: [[String]] -> [[String]] -column x = L.transpose $ formatLines $ L.transpose $ completeMatrix x +column = (L.transpose . formatLines . L.transpose . completeMatrix) main = do content <- getContents