Add List.partitionMap

[Dean177]

This would allow you to transform a list, returning either a Left or a Right to signal which component of the tuple the result should end up in

let partitionMap : 'a list -> f:('a -> ('b, 'c) Either.t)  -> 'b list * 'c list