module AccumulateExample where accumulate : (a -> b) -> List a -> List b accumulate func input = List.map func input -- case input of -- [] -> [] -- otherwise ->