- Timestamp:
- 2019-10-18T12:52:29+02:00 (4 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/branches/2019/dev_r11514_HPC-02_single-core-extrahalo/src/SAO/nemogcm.F90
r11692 r11719 31 31 USE lib_mpp ! distributed memory computing 32 32 USE mppini ! shared/distributed memory setting (mpp_init routine) 33 USE lbcnfd , ONLY : isendto, nsndto , nfsloop, nfeloop! Setup of north fold exchanges33 USE lbcnfd , ONLY : isendto, nsndto ! Setup of north fold exchanges 34 34 USE lib_fortran ! Fortran utilities (allows no signed zero when 'key_nosignedzero' defined) 35 35 #if defined key_iomput 36 36 USE xios ! xIOserver 37 37 #endif 38 USE halo_mng 38 39 39 40 IMPLICIT NONE … … 98 99 ! 99 100 cxios_context = 'nemo' 101 nn_hls = 1 100 102 ! 101 103 ! !-------------------------------------------------! … … 223 225 CALL mpp_init 224 226 227 CALL halo_mng_init() 225 228 ! Now we know the dimensions of the grid and numout has been set: we can allocate arrays 226 229 CALL nemo_alloc()
Note: See TracChangeset
for help on using the changeset viewer.