From 7ec9fbe88458d4fc3713208ab2bc97438f31ebec Mon Sep 17 00:00:00 2001 From: Michele Guerini Rocco Date: Sat, 13 Dec 2014 01:05:02 +0100 Subject: [PATCH] Fix whitespace --- Alea/List.hs | 7 +++---- 1 file changed, 3 insertions(+), 4 deletions(-) diff --git a/Alea/List.hs b/Alea/List.hs index 844f63f..f1c35dd 100644 --- a/Alea/List.hs +++ b/Alea/List.hs @@ -5,7 +5,6 @@ module Alea.List where split :: (Eq a) => a -> [a] -> [[a]] split _ [] = [[]] split delim (c:cs) - | c == delim = [] : rest - | otherwise = (c : head rest) : tail rest - where - rest = split delim cs + | c == delim = [] : rest + | otherwise = (c : head rest) : tail rest + where rest = split delim cs