- Timestamp:
- 2011-10-28T18:14:16+02:00 (13 years ago)
- Location:
- branches/2011/dev_NOC_2011_MERGE/NEMOGCM/NEMO/OPA_SRC
- Files:
-
- 3 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2011/dev_NOC_2011_MERGE/NEMOGCM/NEMO/OPA_SRC/DYN/dynnept.F90
r2986 r3027 24 24 USE oce ! ocean dynamics and tracers 25 25 USE dom_oce ! ocean space and time domain 26 USE obc_oce ! ocean lateral open boundary condition 26 27 USE in_out_manager ! I/O manager 27 28 USE lib_mpp ! distributed memory computing -
branches/2011/dev_NOC_2011_MERGE/NEMOGCM/NEMO/OPA_SRC/LBC/lib_mpp.F90
r3009 r3027 2663 2663 2664 2664 LOGICAL, PUBLIC, PARAMETER :: lk_mpp = .FALSE. !: mpp flag 2665 LOGICAL, PUBLIC :: ln_nnogather = .FALSE. !: namelist control of northfold comms (needed here in case "key_mpp_mpi" is not used) 2665 2666 INTEGER :: ncomm_ice 2666 2667 !!---------------------------------------------------------------------- -
branches/2011/dev_NOC_2011_MERGE/NEMOGCM/NEMO/OPA_SRC/nemogcm.F90
r3009 r3027 624 624 END SUBROUTINE factorise 625 625 626 #if defined key_mpp_mpi 626 627 SUBROUTINE nemo_northcomms 627 628 !!====================================================================== … … 761 762 762 763 END SUBROUTINE nemo_northcomms 764 #else 765 SUBROUTINE nemo_northcomms ! Dummy routine 766 WRITE(*,*) 'nemo_northcomms: You should not have seen this print! error?' 767 END SUBROUTINE nemo_northcomms 768 #endif 763 769 !!====================================================================== 764 770 END MODULE nemogcm
Note: See TracChangeset
for help on using the changeset viewer.