Changeset 10428 for NEMO/trunk/src
- Timestamp:
- 2018-12-20T09:12:57+01:00 (5 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/trunk/src/OCE/LBC/lib_mpp.F90
r10425 r10428 209 209 LOGICAL :: mpi_was_called 210 210 ! 211 NAMELIST/nammpp/ cn_mpi_send, nn_buffer, jpni, jpnj, jpnij,ln_nnogather211 NAMELIST/nammpp/ cn_mpi_send, nn_buffer, jpni, jpnj, ln_nnogather 212 212 !!---------------------------------------------------------------------- 213 213 ! … … 231 231 ! 232 232 IF( jpni < 1 .OR. jpnj < 1 ) THEN 233 WRITE(ldtxt(ii),*) ' jpni , jpnj and jpnij will be calculated automatically' ; ii = ii + 1233 WRITE(ldtxt(ii),*) ' jpni and jpnj will be calculated automatically' ; ii = ii + 1 234 234 ELSE 235 235 WRITE(ldtxt(ii),*) ' processor grid extent in i jpni = ',jpni ; ii = ii + 1
Note: See TracChangeset
for help on using the changeset viewer.