def h.sp

bend-kit-collections@0.1.4.1 · PROOF.bend:2590

import Base
import bend-kit-collections@0.1.4.1/hmap.bend as M

2590def h.sp(
2591  ~K: Data, ~V: Data, ~eq: K -> K -> Bool, b1: Bool, +b2: Bool, +p: Nat, +mask: U32, +o: U32,
2592  +es: List<&2, M.Entry<K, V>>, +hk: U32, +k: K, +v: V
2593) -> M.HMap<K, V>:
2594  M.HMap.bool(M.HMap<K, V>, b1,
2595    u => M.HMap.bool(M.HMap<K, V>, b2,
2596      x => M.HBranch{M.HMap.split(~K, ~V, ~eq, p, (mask << 1n : U32), o, es, hk, k, v), M.HNil{}},
2597      x => M.HBranch{M.HNil{}, M.HMap.split(~K, ~V, ~eq, p, (mask << 1n : U32), o, es, hk, k, v)}),
2598    u => M.HMap.split.side(K, V, b2, M.HLeaf{o, es}, M.HLeaf{hk, [M.Entry{k, v}]}))