From ce1a091cfc9f3ef44ee5a2e8401a21a45562309b Mon Sep 17 00:00:00 2001 From: toast Date: Sun, 7 Dec 2025 17:59:05 +0000 Subject: [PATCH] remove vestigial code --- 07/solution.hs | 3 --- 1 file changed, 3 deletions(-) diff --git a/07/solution.hs b/07/solution.hs index 11c91f5..e34af05 100644 --- a/07/solution.hs +++ b/07/solution.hs @@ -9,9 +9,6 @@ traceOut x = traceShow x x (***) :: (a -> a') -> (b -> b') -> (a, b) -> (a', b') (f *** g) (x, y) = (f x, g y) -(****) :: (a -> a' -> a'') -> (b -> b' -> b'') -> (a, b) -> (a', b') -> (a'', b'') -(f **** g) (p, q) (r, s) = (f p r, g q s) - addFirst :: [[a]] -> a -> [[a]] addFirst [] x = [[x]] addFirst (y:ys) x = (x : y) : ys