(bind-func main
(lambda ()
;; Initialize the MPI environment. The two arguments to MPI Init are not
;; currently used by MPI implementations, but are there in case future
;; implementations might need the arguments.
(MPI_Init null null)