def extreme_tag

bend-collections@1.0.0.0 · src/containers/balanced_search_tree.bend:890

import bend-collections@1.0.0.0/src/containers/balanced_search_tree.bend as BalancedSearchTree
import Base

890def extreme_tag(~K: Data, ~V: Data, ~cmp: K -> K -> Cmp, +forward: Bool, +i: Nat, r: NodeStore<K> & Nat) -> NodeStore<K> & Nat:
891  match r:
892    case Tuple{nodes, 0n}:
893      (nodes, 0n)
894    case Tuple{nodes, 1n+c}:
895      side_at(~K, ~V, ~cmp, nodes, Bool.not(forward), i)

Uses (8)

Used by (1)