Ignore:
Timestamp:
2019-09-02T15:30:17+02:00 (2 years ago)
Author:
mathiot
Message:

ENHANCE-02_ISF: move ln_isf out of namsbc and add an easy way to run with isf cavity and no ice shelf melt (ticket #2142)

File:
1 edited

Legend:

Unmodified
Added
Removed
  • NEMO/branches/2019/ENHANCE-02_ISF_nemo/src/OCE/SBC/sbcmod.F90

    r11395 r11489  
    4242   USE sbcrnf         ! surface boundary condition: runoffs 
    4343   USE sbcapr         ! surface boundary condition: atmo pressure  
    44    USE isf            ! surface boundary condition: ice shelf 
    4544   USE sbcfwb         ! surface boundary condition: freshwater budget 
    4645   USE icbstp         ! Icebergs 
     
    9089      LOGICAL ::   ll_purecpl, ll_opa, ll_not_nemo   ! local logical 
    9190      !! 
    92       NAMELIST/namsbc/ nn_fsbc  ,                                                    & 
    93          &             ln_usr   , ln_flx   , ln_blk       ,                          & 
    94          &             ln_cpl   , ln_mixcpl, nn_components,                          & 
    95          &             nn_ice   , ln_ice_embd,                                       & 
    96          &             ln_traqsr, ln_dm2dc ,                                         & 
    97          &             ln_rnf   , nn_fwb   , ln_ssr   , ln_isf    , ln_apr_dyn ,     & 
    98          &             ln_wave  , ln_cdgw  , ln_sdw   , ln_tauwoc  , ln_stcor   ,     & 
    99          &             ln_tauw  , nn_lsm, nn_sdrift 
     91      NAMELIST/namsbc/ nn_fsbc  ,                                                  & 
     92         &             ln_usr   , ln_flx     , ln_blk       ,                      & 
     93         &             ln_cpl   , ln_mixcpl  , nn_components,                      & 
     94         &             nn_ice   , ln_ice_embd,                                     & 
     95         &             ln_traqsr, ln_dm2dc   ,                                     & 
     96         &             ln_rnf   , nn_fwb     , ln_ssr   , ln_apr_dyn,              & 
     97         &             ln_wave  , ln_cdgw    , ln_sdw   , ln_tauwoc , ln_stcor,    & 
     98         &             ln_tauw  , nn_lsm     , nn_sdrift 
    10099      !!---------------------------------------------------------------------- 
    101100      ! 
     
    152151         WRITE(numout,*) '         Patm gradient added in ocean & ice Eqs.    ln_apr_dyn    = ', ln_apr_dyn 
    153152         WRITE(numout,*) '         runoff / runoff mouths                     ln_rnf        = ', ln_rnf 
    154          WRITE(numout,*) '         iceshelf formulation                       ln_isf        = ', ln_isf 
    155153         WRITE(numout,*) '         nb of iterations if land-sea-mask applied  nn_lsm        = ', nn_lsm 
    156154         WRITE(numout,*) '         surface wave                               ln_wave       = ', ln_wave 
Note: See TracChangeset for help on using the changeset viewer.