c
 (lambda (await resume)
   (let ((lst (parallel-map await resume do-work (list 1 2 3 4 5))))
     (display lst)(newline)
     (event-loop-block! #f))))
(event-loop-run!)
</pre></div>

<p>See the documentation on the meeting-send and meeting-receive
procedures below for an example of multiple &quot;pseudo-threads&quot; sending
to or receiving from a single meeting object for fan in and fan out,
and for an example of those procedures &rsquo;selecting&rsquo; on more than one
meeting object.
</p>
<p>The (a-sy