From c1c14a1fe982ec802cc1d4ad6953e2f7850f4d85 Mon Sep 17 00:00:00 2001 From: Thorn Avery Date: Sun, 6 Dec 2020 20:04:53 +1300 Subject: [PATCH] whoops deleted stray file --- split.hs | 6 ------ 1 file changed, 6 deletions(-) delete mode 100644 split.hs diff --git a/split.hs b/split.hs deleted file mode 100644 index 09b0359..0000000 --- a/split.hs +++ /dev/null @@ -1,6 +0,0 @@ -split :: Eq a => a -> [a] -> [[a]] -split _ [] = [] -split d as = chunk : (split d rest) - where - chunk = takeWhile (/= d) as - rest = drop 1 $ dropWhile (/= d) as