This repository has been archived on 2023-08-20. You can view files and clone it, but cannot push or open issues or pull requests.
yap-6.3/library/lammpi/examples/hello.yap

14 lines
254 B
Plaintext
Raw Normal View History

2012-02-02 10:00:17 +00:00
:- use_module(library(lam_mpi)).
:- initialization(main).
main :-
mpi_init,
mpi_comm_size(Sz),
mpi_comm_rank(Rank),
mpi_version(V0,V1),
format('MPI ~d.~d workers=~d id=~d~n', [V0,V1,Sz, Rank]),
mpi_finalize.