Changeset 2363
- Timestamp:
- 2010-11-05T14:11:29+01:00 (13 years ago)
- Location:
- branches/nemo_v3_3_beta/NEMOGCM/NEMO/OPA_SRC
- Files:
-
- 3 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/nemo_v3_3_beta/NEMOGCM/NEMO/OPA_SRC/OBS/mpp_map.F90
r2335 r2363 47 47 #if defined key_mpp_mpi 48 48 INTEGER :: ierr 49 49 50 INCLUDE 'mpif.h' 50 51 #endif -
branches/nemo_v3_3_beta/NEMOGCM/NEMO/OPA_SRC/OBS/obs_mpp.F90
r2335 r2363 66 66 !! 67 67 #if defined key_mpp_mpi 68 INTEGER :: ierr 68 INTEGER :: ierr 69 69 70 INCLUDE 'mpif.h' 70 71 !!---------------------------------------------------------------------- … … 98 99 !! 99 100 #if defined key_mpp_mpi 100 INTEGER :: ierr 101 INTEGER :: ierr 101 102 INTEGER, DIMENSION(kno) :: ivals 103 102 104 INCLUDE 'mpif.h' 103 105 !!---------------------------------------------------------------------- -
branches/nemo_v3_3_beta/NEMOGCM/NEMO/OPA_SRC/lib_mpp.F90
r2304 r2363 114 114 INTEGER :: mppsize ! number of process 115 115 INTEGER :: mpprank ! process number [ 0 - size-1 ] 116 !$AGRIF_DO_NOT_TREAT 116 117 INTEGER, PUBLIC :: mpi_comm_opa ! opa local communicator 118 !$AGRIF_END_DO_NOT_TREAT 117 119 118 120 INTEGER, PUBLIC :: MPI_SUMDD
Note: See TracChangeset
for help on using the changeset viewer.