From 4709700840afde45a34144b8843a16be7d5d2b37 Mon Sep 17 00:00:00 2001
From: karchnu <karchnu@karchnu.fr>
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