Could you try running a simple mpi example to check mpi.
Copyt the text below into a file named hello_world.f90
! Fortran example
program hello
include 'mpif.h'
integer rank, size, ierror, tag, status(MPI_STATUS_SIZE)
call MPI_INIT(ierror)
call MPI_COMM_SIZE(MPI_COMM_WORLD, size, ierror)
call MPI_COMM_RANK(MPI_COMM_WORLD, rank, ierror)
print*, 'node', rank, ': Hello world'
call MPI_FINALIZE(ierror)
end
Then run the following command to compile it:
gfortran -I C:\opentelemac-mascaret\mpich2\include hello_world.f90 C:\opentelemac-mascaret\mpich2\lib\libfmpich2g.a -o hello_world
Thn this to run it:
C:\opentelemac-mascaret\mpich2\bin\mpiexec.exe -n 4 hello_world
It should give you something like that:
node 0 : Hello world
node 1 : Hello world
node 2 : Hello world
node 3 : Hello world