parallel-product-map ( seq quot: ( elt -- newelt ) -- newseq )
Concurrent combinators

Prev:	parallel-cartesian-each ( seq1 seq2 quot: ( elt1 elt2 -- ) -- )
Next:	parallel-cartesian-map ( seq1 seq2 quot: ( elt1 elt2 -- newelt ) -- newseq )

Vocabulary
concurrency.combinators

Inputs

seq	an object
quot	a quotation with stack effect ( elt -- newelt )

Outputs

newseq

an object

Definition

USING: kernel sequences.product ;

IN: concurrency.combinators

: parallel-product-map
    ( seq quot: ( elt -- newelt ) -- newseq )
    [ <product-sequence> ] dip parallel-map ;