parallel-closure-with ( vertex quot1: ( key -- vertices ) quot2: ( vertex -- edges ) -- set )

Vocabulary

hacker-news

Inputs

vertex	an object
quot1	a quotation with stack effect ( key -- vertices )
quot2	a quotation with stack effect ( vertex -- edges )

Outputs

set

an object

Definition

USING: concurrency.combinators graphs kernel ;

IN: hacker-news

: parallel-closure-with
    ( vertex quot1: ( key -- vertices ) quot2: ( vertex -- edges ) -- set )
    over '[ @ [ @ _ parallel-map ] closure ] call ; inline