Ignore:
Timestamp:
2019-10-18T12:52:29+02:00 (12 months ago)
Author:
francesca
Message:

add extra halo support- ticket #2009

File:
1 edited

Legend:

Unmodified
Added
Removed
  • NEMO/branches/2019/dev_r11514_HPC-02_single-core-extrahalo/src/SAS/nemogcm.F90

    r11692 r11719  
    3535   USE lib_mpp        ! distributed memory computing 
    3636   USE mppini         ! shared/distributed memory setting (mpp_init routine) 
    37    USE lbcnfd  , ONLY : isendto, nsndto, nfsloop, nfeloop   ! Setup of north fold exchanges 
     37   USE lbcnfd  , ONLY : isendto, nsndto  ! Setup of north fold exchanges 
    3838   USE lib_fortran    ! Fortran utilities (allows no signed zero when 'key_nosignedzero' defined) 
    3939#if defined key_iomput 
     
    4343   USE agrif_ice_update ! ice update 
    4444#endif 
     45   USE halo_mng 
    4546 
    4647   IMPLICIT NONE 
     
    194195      ELSE                  ;   cxios_context = 'nemo' 
    195196      ENDIF 
     197      nn_hls = 1 
    196198      ! 
    197199      !                             !-------------------------------------------------! 
     
    331333      CALL mpp_init 
    332334 
     335      CALL halo_mng_init() 
    333336      ! Now we know the dimensions of the grid and numout has been set: we can allocate arrays 
    334337      CALL nemo_alloc() 
Note: See TracChangeset for help on using the changeset viewer.