diff options
Diffstat (limited to 'src/client/elm/Utils/List.elm')
| -rw-r--r-- | src/client/elm/Utils/List.elm | 17 |
1 files changed, 0 insertions, 17 deletions
diff --git a/src/client/elm/Utils/List.elm b/src/client/elm/Utils/List.elm deleted file mode 100644 index cc57d9f..0000000 --- a/src/client/elm/Utils/List.elm +++ /dev/null @@ -1,17 +0,0 @@ -module Utils.List exposing - ( groupBy - , mean - ) - -import Dict - -groupBy : (a -> comparable) -> List a -> List (comparable, List a) -groupBy f xs = - let addItem item dict = - let groupItems = Dict.get (f item) dict |> Maybe.withDefault [] - in Dict.insert (f item) (item :: groupItems) dict - in List.foldr addItem Dict.empty xs - |> Dict.toList - -mean : List Int -> Int -mean xs = (List.sum xs) // (List.length xs) |