1 files changed, 15 insertions, 0 deletions
diff --git a/modules/mpi/examples/foo.sci b/modules/mpi/examples/foo.sci
new file mode 100755
index 000000000..875197c6e
--- /dev/null
+++ b/modules/mpi/examples/foo.sci
@@ -0,0 +1,15 @@
+MPI_Init();
+rnk = MPI_Comm_rank()
+sizeNodes =	MPI_Comm_size();
+SLV = rnk;
+Master = ~ SLV;
+
+if Master then
+    disp("Master");
+    MPI_Send(rand(10,10), 1);
+else
+    val = MPI_Recv(0, 0);
+    disp(val, rnk)
+end
+
+MPI_Finalize();