Function make_

packages/effect-app/src/Set.ts:618–652

(ord: Order.Order<A>, eq_?: Equivalence.Equivalence<A>)

}

function make_<A>(ord: Order.Order<A>, eq_?: Equivalence.Equivalence<A>) {
  const eq = eq_ ?? ((x, y) => ord(x, y) === 0)

  const fromArray_ = fromArray(eq)
  const concat_ = (set: Set<A>, it: Iterable<A>) => fromArray_([...set, ...it])
  const insert__ = insert(eq)

  function replace_(set: Set<A>, a: A) {
    return pipe(filter_(set, (x) => !eq(x, a)), insert__(a))
  }

  return {
    insert: insert__,
    insert_: insert_(eq),
    remove: remove(eq),
    remove_: remove_(eq),
    reduce: reduce(ord),
    reduce_: reduce_(ord),
    replace: (a: A) => (set: Set<A>) => replace_(set, a),
    replace_,
    toArray: toArray(ord),
    fromArray,
    from: (it: Iterable<A>) => fromArray_([...it]),
    empty: () => new Set<A>(),
    concat_,
    concat: (it: Iterable<A>) => (set: Set<A>) => concat_(set, it),

    // A and B the same, useful when editing elements.
    map: map(eq),
    map_: map_(eq),
    filterMap: filterMap(eq),
    filterMap_: filterMap_(eq)
  }
  // TODO: extend
}

class Wrapper<A> {
  wrapped(ord: Order.Order<A>, eq: Equivalence.Equivalence<A>) {