.../
... + -- EO
| |
| |
+-- src ----- + -- EDO
| |
| |
+-- test + -- MO
| |
| |
+-- tutorial + -- MOEO
| |
| |
+-- doc + -- SMP
| |
| |
... + -- EOMPI
|
|
+ -- EOSERIAL
Question for current maintainers: ./README: new release?
Also:
* Moving out eompi & eoserial modules (issue #2).
* Correction of the errors when executing "make doc" command.
* Adding a solution for the conflicting headers problem (see the two CMake Cache
Values: PROJECT_TAG & PROJECT_HRS_INSTALL_SUBPATH) (issue #1)
* Header inclusions:
** src: changing absolute paths into relative paths ('#include <...>' -> '#include "..."')
** test, tutorial: changing relative paths into absolute paths ('#include "..."' -> '#include <...>')
* Moving out some scripts from EDO -> to the root
* Add a new script for compilation and installation (see build_gcc_linux_install)
* Compilation with uBLAS library or EDO module: now ok
* Minor modifications on README & INSTALL files
* Comment eompi failed tests with no end
*** TODO: CPack (debian (DEB) & RedHat (RPM) packages) (issues #6 & #7) ***
35 lines
923 B
C
Executable file
35 lines
923 B
C
Executable file
# include <mpi.h>
|
|
# include <stdio.h>
|
|
# include <string.h>
|
|
|
|
int main(int argc, char **argv)
|
|
{
|
|
int rank, size;
|
|
char someString[] = "Can haz cheezburgerz?";
|
|
|
|
MPI_Init(&argc, &argv);
|
|
|
|
MPI_Comm_rank( MPI_COMM_WORLD, & rank );
|
|
MPI_Comm_size( MPI_COMM_WORLD, & size );
|
|
|
|
if ( rank == 0 )
|
|
{
|
|
int n = 42;
|
|
int i;
|
|
for( i = 1; i < size; ++i)
|
|
{
|
|
MPI_Send( &n, 1, MPI_INT, i, 0, MPI_COMM_WORLD );
|
|
MPI_Send( &someString, strlen( someString )+1, MPI_CHAR, i, 0, MPI_COMM_WORLD );
|
|
}
|
|
} else {
|
|
char buffer[ 128 ];
|
|
int received;
|
|
MPI_Status stat;
|
|
MPI_Recv( &received, 1, MPI_INT, 0, 0, MPI_COMM_WORLD, &stat );
|
|
printf( "[Worker] Number : %d\n", received );
|
|
MPI_Recv( buffer, 128, MPI_CHAR, 0, 0, MPI_COMM_WORLD, &stat );
|
|
printf( "[Worker] String : %s\n", buffer );
|
|
}
|
|
|
|
MPI_Finalize();
|
|
}
|