Function reduce

packages/effect-app/src/Set.ts:401–406

(
  O: Order.Order<A>
)

 * Reduce over the set values
 */
export function reduce<A>(
  O: Order.Order<A>
): <B>(b: B, f: (b: B, a: A) => B) => (fa: Set<A>) => B {
  const red = reduce_(O)
  return (b, f) => (fa) => red(fa, b, f)
}

/**
 * Reduce over the set values