whoops deleted stray file

This commit is contained in:
Thorn Avery 2020-12-06 20:04:53 +13:00
parent 2dc820fc5b
commit c1c14a1fe9

View File

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