day4,5: update - use parser combinators

not the cleanest, im still learning parsing in hs

Signed-off-by: Amneesh Singh <natto@weirdnatto.in>

Lib.hs

@@ -1,17 +0,0 @@
-module Lib (chunks, split) where
-
-chunks :: Int -> [a] -> [[a]]
-chunks n xs
-  | null xs = []
-  | otherwise = head : chunks n tail
-  where (head, tail) = splitAt n xs
-
-split :: Eq a => a -> [a] -> [[a]]
-split del =
-  foldr
-    ( \c (x : xs) ->
-        if c == del
-          then [] : x : xs
-          else (c : x) : xs
-    )
-    [[]]