MODULE lmdz_mpi #ifdef CPP_MPI INCLUDE 'mpif.h' LOGICAL,PARAMETER :: using_mpi = .TRUE. #else LOGICAL, PARAMETER :: using_mpi = .FALSE. INTEGER, PARAMETER :: MPI_REAL8 = 1 INTEGER, PARAMETER :: MPI_INTEGER = 1 INTEGER, PARAMETER :: MPI_CHARACTER = 1 INTEGER, PARAMETER :: MPI_LOGICAL = 1 INTEGER, PARAMETER :: MPI_SUM = 1 INTEGER, PARAMETER :: MPI_MIN = 1 INTEGER, PARAMETER :: MPI_COMM_WORLD = 1 INTEGER, PARAMETER :: MPI_STATUS_SIZE = 1 INTEGER, PARAMETER :: MPI_THREAD_SERIALIZED = 1 INTEGER(kind = 8), PARAMETER :: MPI_ADDRESS_KIND = 1 INTEGER, PARAMETER :: MPI_INFO_NULL = 1 #endif END MODULE lmdz_mpi