fix arena initialization

library/matrix.yap

@@ -95,7 +95,10 @@ typedef enum {
 	    matrix_set/2,
 	    foreach/2,
 	    foreach/4,
-	    op(100, fy, '[]')
+	    op(50, yf, []),
+            op(50, yf, '()'),
+            op(100, xfy, '.'),
+            op(100, fy, '.')
 	    ]).
 
 :- load_foreign_files([matrix], [], init_matrix).

library/mpi/mpe.yap

@@ -0,0 +1,11 @@
+
+:- module(mpe,[
+	      mpi_open/0,
+	      mpi_start/0,
+	      mpi_close/1,
+	      mpi_create_event/1,
+	      mpi_create_state/4]).
+
+:- load_foreign_files([mpe], [], init_mpe).
+
+

library/mpi/mpi.yap

@@ -0,0 +1,13 @@
+
+:- module(mpi,[
+	      mpi_open/3,
+	      mpi_close/0,
+	      mpi_send/3,
+	      mpi_receive/3,
+	      mpi_bcast/3,
+	      mpi_bcast/2,
+	      mpi_barrier/0]).
+
+:- load_foreign_files([mpi], [], init_mpi).
+
+