2016-05-13 02:26:52 +00:00
|
|
|
module Accumulate exposing (..)
|
2016-03-17 01:38:35 +00:00
|
|
|
|
2015-09-12 20:38:29 +00:00
|
|
|
|
|
|
|
accumulate : (a -> b) -> List a -> List b
|
2016-03-17 01:38:35 +00:00
|
|
|
accumulate func input =
|
2016-03-17 00:20:10 +00:00
|
|
|
List.foldr (\v c -> func v :: c) [] input
|