6 lines
102 B
Haskell
6 lines
102 B
Haskell
module Util where
|
|
|
|
mapFirst :: (a -> a) -> [a] -> [a]
|
|
mapFirst f (x:xs) = f x : xs
|
|
mapFirst _ [] = []
|