2016-05-12 22:26:52 -04:00
|
|
|
module Accumulate exposing (..)
|
2016-03-16 21:38:35 -04:00
|
|
|
|
2015-09-12 13:38:29 -07:00
|
|
|
|
|
|
|
accumulate : (a -> b) -> List a -> List b
|
2016-03-16 21:38:35 -04:00
|
|
|
accumulate func input =
|
2016-06-19 17:46:13 -04:00
|
|
|
List.foldr (\v c -> func v :: c) [] input
|