Implementing Promise.allSettled

[THOUSAND-SKY]

I was looking for a way to replicating Promise.allSettled behavior and I ran across this recipes page, but the allSettled one is definitely outdated. Could anyone help out with an up-to-date version?

Here is a small starter

import { array, task, taskEither } from "fp-ts";
import { pipe  } from "fp-ts/function";

(async () => {
	console.log(
		await pipe(
			[1,2,3,4],
			array.map(x => x > 2 ? taskEither.left(x) : taskEither.right(x)),
			// Promise.all
			// taskEither.sequenceArray,
			// Same thing?
			array.sequence(taskEither.ApplicativePar),
		)()
	); // would like to get [right right left left], or something like that
})()

Also how about using the github wiki and making it public editable? Recipes such as these might be kept up to date with a lower barrier of entry, then.

[gcanti]

import { array, task, taskEither } from 'fp-ts'
import { pipe } from 'fp-ts/function'
;(async () => {
  console.log(
    await pipe(
      [1, 2, 3, 4],
      array.map((x) =>
        x > 2 ? taskEither.left<number, number>(x) : taskEither.right(x)
      ),
      array.sequence(task.ApplicativePar)
    )()
  )
})()

p.s.

Note that map + sequence = traverse

import { array, task, taskEither } from 'fp-ts'
import { pipe } from 'fp-ts/function'
;(async () => {
  console.log(
    await pipe(
      [1, 2, 3, 4],
      array.traverse(task.ApplicativePar)((x) =>
        x > 2 ? taskEither.left<number, number>(x) : taskEither.right(x)
      )
    )()
  )
})()

[THOUSAND-SKY]

Big thanks! Seems pretty obvious in hindsight. So the catch for me was the typings in taskEither.left<number, number>(x), I suppose.