def extreme_tag
import bend-collections@1.0.0.0/src/containers/balanced_search_tree.bend as BalancedSearchTreeimport 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)