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 _ [] = []
|