source:
vendors/XMLIO_SERVER/current/src/IOSERVER/mpi_mod.F90
@
1897
| Last change on this file since 1897 was 1897, checked in by flavoni, 14 years ago | |
|---|---|
| File size: 196 bytes | |
| Line | |
|---|---|
| 1 | MODULE 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 | |
| 11 | END MODULE mpi_mod |
Note: See TracBrowser
for help on using the repository browser.
