Function separate

packages/effect-app/src/Set.ts:532–557

(
  EE: Equivalence.Equivalence<E>,
  EA: Equivalence.Equivalence<A>
)

 * Separate elements
 */
export function separate<E, A>(
  EE: Equivalence.Equivalence<E>,
  EA: Equivalence.Equivalence<A>
): (fa: Set<Result.Result<A, E>>) => readonly [Set<E>, Set<A>] {
  return (fa) => {
    const elemEE = elem_(EE)
    const elemEA = elem_(EA)
    const left: MutableSet<E> = new Set()
    const right: MutableSet<A> = new Set()
    fa.forEach((e) => {
      switch (e._tag) {
        case "Failure":
          if (!elemEE(left, e.failure)) {
            left.add(e.failure)
          }
          break
        case "Success":
          if (!elemEA(right, e.success)) {
            right.add(e.success)
          }
          break
      }
    })
    return tuple(left, right)
  }
}

/**
 * Filter + Map