- Timestamp:
- 2020-10-06T18:17:44+02:00 (4 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/branches/2020/dev_r13296_HPC-07_mocavero_mpi3/src/OCE/LBC/lib_mpp.F90
r13561 r13571 74 74 PUBLIC tic_tac 75 75 #if ! defined key_mpp_mpi 76 PUBLIC MPI_wait 76 77 PUBLIC MPI_Wtime 77 78 #endif … … 116 117 #else 117 118 INTEGER, PUBLIC, PARAMETER :: MPI_STATUS_SIZE = 1 119 INTEGER, PUBLIC, PARAMETER :: MPI_REAL = 4 118 120 INTEGER, PUBLIC, PARAMETER :: MPI_DOUBLE_PRECISION = 8 119 121 LOGICAL, PUBLIC, PARAMETER :: lk_mpp = .FALSE. !: mpp flag
Note: See TracChangeset
for help on using the changeset viewer.