- Timestamp:
- 2017-06-26T16:29:53+02:00 (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2017/dev_r8126_ROBUST10_MPPINI/NEMOGCM/NEMO/OPA_SRC/nemogcm.F90
r7761 r8219 413 413 414 414 ! ! Domain decomposition 415 IF( jpni*jpnj == jpnij ) THEN ; CALL mpp_init ! standard cutting out 416 ELSE ; CALL mpp_init2 ! eliminate land processors 417 ENDIF 415 CALL mpp_init 418 416 ! 419 417 IF( nn_timing == 1 ) CALL timing_init
Note: See TracChangeset
for help on using the changeset viewer.