def h.eg_del_other

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

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

2348def h.eg_del_other(
2349  ~K: Data, ~V: Data, ~eq: K -> K -> Bool,
2350  ~sound: @x: K -> @y: K -> {eq(x, y) == True{} : Bool} -> {x == y : K},
2351  xs: List<&2, M.Entry<K, V>>, +k2: K, +k: K, +ne: {eq(k, k2) == False{} : Bool}
2352) -> {M.HMap.entries.get(~K, ~V, ~eq, M.HMap.entries.del(~K, ~V, ~eq, xs, k2), k)
2353      == M.HMap.entries.get(~K, ~V, ~eq, xs, k) : Maybe<&2, V>}:
2354  match xs:
2355    case Nil{}:
2356      {==}
2357    case Con{M.Entry{+key, +val}, +rest}:
2358      h.eg_del_other.c(~K, ~V, ~eq, ~sound, key, val, rest, k2, k, ne, eq(k2, key), {==},
2359        h.eg_del_other(~K, ~V, ~eq, ~sound, rest, k2, k, ne))