Omap.OMap.rot_hi: def of bend-kit-collections@0.1.4.1
Import: import bend-kit-collections@0.1.4.1/omap.bend as Omap
Lines 96-107 of bend-kit-collections@0.1.4.1/omap.bend: https://jend.leeeet.dev/read.txt?path=bend-kit-collections@0.1.4.1/omap.bend&start_line=96&end_line=107

import Base

# The lo side is too heavy: move weight toward hi.
def OMap.rot_hi(
  -K: Data, -V: Data, k: K, v: V, lo: OMap<K, V>, hi: OMap<K, V>
) -> OMap<K, V>:
  match lo:
    case OTip{}:
      OMap.bin(K, V, k, v, OTip{}, hi)
    case OBin{s, lk, lv, +ll, +lh}:
      OMap.rot_hi.pick(K, V,
        U32.is_lt((OMap.size(K, V, lh) + 1 : U32),
          (2 * (OMap.size(K, V, ll) + 1) : U32)),
        k, v, lk, lv, ll, lh, hi)

Uses (8):
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=U32
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=U32.add
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=U32.is_lt
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=U32.mul
  https://jend.leeeet.dev/definition.txt?path=bend-kit-collections@0.1.4.1/omap.bend&name=OMap
  https://jend.leeeet.dev/definition.txt?path=bend-kit-collections@0.1.4.1/omap.bend&name=OMap.bin
  https://jend.leeeet.dev/definition.txt?path=bend-kit-collections@0.1.4.1/omap.bend&name=OMap.rot_hi.pick
  https://jend.leeeet.dev/definition.txt?path=bend-kit-collections@0.1.4.1/omap.bend&name=OMap.size