Ignore:
Timestamp:
2019-07-02T19:32:41+02:00 (15 months ago)
Author:
mathiot
Message:

ENHANCE-03_closea: closea correction change to match new closea mask in domain_cfg (ticket #2143)

Location:
NEMO/branches/2019/ENHANCE-03_closea
Files:
1 edited
1 copied

Legend:

Unmodified
Added
Removed
  • NEMO/branches/2019/ENHANCE-03_closea/src/OCE/DOM/domzgr.F90

    r10425 r11207  
    118118      ! Any closed seas (defined by closea_mask > 0 in domain_cfg file) to be filled  
    119119      ! in at runtime if ln_closea=.false. 
    120       IF( .NOT.ln_closea )   CALL clo_bat( k_top, k_bot ) 
     120      IF( ln_closea ) THEN 
     121         IF ( ln_maskcs ) THEN 
     122            ! mask all the closed sea 
     123            CALL clo_bat( k_top, k_bot, mask_opnsea, 'mask_opensea' ) 
     124         ELSE IF ( ln_mask_csundef ) THEN 
     125            ! defined closed sea are kept 
     126            ! mask all the undefined closed sea 
     127            CALL clo_bat( k_top, k_bot, mask_csundef, 'mask_csundef' ) 
     128         END IF 
     129      END IF 
    121130      ! 
    122131      IF(lwp) THEN                     ! Control print 
Note: See TracChangeset for help on using the changeset viewer.