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/SBC/sbcmod.F90

    r10499 r11207  
    2424   USE oce            ! ocean dynamics and tracers 
    2525   USE dom_oce        ! ocean space and time domain 
     26   USE closea         ! closed seas 
    2627   USE phycst         ! physical constants 
    2728   USE sbc_oce        ! Surface boundary condition: ocean fields 
     
    323324      !                       !**  associated modules : initialization 
    324325      ! 
     326      IF( l_sbc_clo   )   CALL sbc_clo_init            ! closed sea surface initialisation 
     327      ! 
    325328                          CALL sbc_ssm_init            ! Sea-surface mean fields initialization 
    326329      ! 
     
    461464      ! Special treatment of freshwater fluxes over closed seas in the model domain 
    462465      ! Should not be run if ln_diurnal_only 
    463       IF( l_sbc_clo .AND. (.NOT. ln_diurnal_only) )   CALL sbc_clo( kt )    
     466      IF( l_sbc_clo     )   CALL sbc_clo( kt )    
    464467 
    465468!!$!RBbug do not understand why see ticket 667 
Note: See TracChangeset for help on using the changeset viewer.