1 #!/usr/bin/env -S guile -s
4 (add-to-load-path "..")
5 (use-modules (srfi srfi-1))
8 (define (sum-with-process-id a b) (+ a (rpc-worker-process-id) (fold + 0 b)))
12 (format #t "I'm master process. Received ~s ~%" (rpc-apply-bcast sum-with-process-id 10 '(5 3 2)))