whoops deleted stray file

split.hs

@@ -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