aboutsummaryrefslogtreecommitdiff
path: root/aoc-2020-gleam/src/ext/listx.gleam
diff options
context:
space:
mode:
Diffstat (limited to 'aoc-2020-gleam/src/ext/listx.gleam')
-rw-r--r--aoc-2020-gleam/src/ext/listx.gleam7
1 files changed, 7 insertions, 0 deletions
diff --git a/aoc-2020-gleam/src/ext/listx.gleam b/aoc-2020-gleam/src/ext/listx.gleam
index 2ca8648..0a3d7c3 100644
--- a/aoc-2020-gleam/src/ext/listx.gleam
+++ b/aoc-2020-gleam/src/ext/listx.gleam
@@ -1,6 +1,7 @@
import gleam/pair
import gleam/iterator as iter
import gleam/result as res
+import gleam/dict.{type Dict}
import ext/iteratorx as iterx
pub fn count(list: List(a), satisfying predicate: fn(a) -> Bool) -> Int {
@@ -9,6 +10,12 @@ pub fn count(list: List(a), satisfying predicate: fn(a) -> Bool) -> Int {
|> iterx.count(satisfying: predicate)
}
+pub fn counts(list: List(a)) -> Dict(a, Int) {
+ list
+ |> iter.from_list
+ |> iterx.counts
+}
+
fn set_helper(list: List(a), value: a, index: Int, counter: Int) -> List(a) {
case list {
[] -> []