Agda.Utils.AssocList

Additional functions for association lists.

Documentation

type AssocList k v = [(k, v)]

A finite map, represented as a set of pairs.

Invariant: at most one value per key.

delete :: Eq k => k -> AssocList k v -> AssocList k v

O(n). Delete a binding. The key must be in the domain of the finite map. Otherwise, an internal error is raised.

apply :: Ord k => AssocList k v -> k -> Maybe v

Lookup keys in the same association list often. Use partially applied to create partial function apply m :: k -> Maybe v.

• First time: O(n log n) in the worst case.
• Subsequently: O(log n).

Specification: apply m == (lookup m).

insert :: k -> v -> AssocList k v -> AssocList k v

O(1). Add a new binding. Assumes the binding is not yet in the list.

mapWithKey :: (k -> v -> v) -> AssocList k v -> AssocList k v

O(n). Map over an association list, preserving the order.

keys :: AssocList k v -> [k]

O(n). Get the domain (list of keys) of the finite map.

update :: Eq k => k -> v -> AssocList k v -> AssocList k v

O(n). Update the value at a key. The key must be in the domain of the finite map. Otherwise, an internal error is raised.

updateAt :: Eq k => k -> (v -> v) -> AssocList k v -> AssocList k v

O(n). Update the value at a key with a certain function. The key must be in the domain of the finite map. Otherwise, an internal error is raised.

mapKeysMonotonic :: (k -> k') -> AssocList k v -> AssocList k' v

O(n). Named in analogy to mapKeysMonotonic. To preserve the invariant, it is sufficient that the key transformation is injective (rather than monotonic).

mapWithKeyM :: Applicative m => (k -> v -> m v) -> AssocList k v -> m (AssocList k v)

O(n). If called with a effect-producing function, violation of the invariant could matter here (duplicating effects).

lookup :: Eq a => a -> [(a, b)] -> Maybe b

\(\mathcal{O}(n)\). lookup key assocs looks up a key in an association list. For the result to be Nothing, the list must be finite.

>>> lookup 2 []
Nothing
>>> lookup 2 [(1, "first")]
Nothing
>>> lookup 2 [(1, "first"), (2, "second"), (3, "third")]
Just "second"