source: XMLIO_SERVER/trunk/src/IOSERVER/mpi_mod.F90 @ 37

Last change on this file since 37 was 37, checked in by ymipsl, 15 years ago

Feature : permet d'utiliser XMLIO-SERVER sans MPI, donc en mode édition de lien, sans server.
File size: 196 bytes
Line 
1MODULE mpi_mod
2
3#ifdef NO_MPI
4    LOGICAL, PARAMETER :: using_mpi=.FALSE.
5    INCLUDE 'ios_mpif.h'
6#else
7    LOGICAL, PARAMETER :: using_mpi=.TRUE.
8    INCLUDE 'mpif.h'
9#endif
10
11END MODULE mpi_mod
Note: See TracBrowser for help on using the repository browser.