Ignore:
Timestamp:
2019-11-19T18:30:57+01:00 (12 months ago)
Author:
mathiot
Message:

ENHANCE-02_ISF_nemo: add comments, improve memory usage of ln_isfcpl_cons option, fix issue in ISOMIP+ configuration

File:
1 edited

Legend:

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

    r11876 r11931  
    3737      !!                https://doi.org/10.1029/2007JC004368 , 2008 
    3838      !! 
    39       !!-------------------------------------------------------------------- 
    4039      !!-------------------------- OUT ------------------------------------- 
    4140      REAL(wp), DIMENSION(jpi,jpj)          , INTENT(  out) :: pvarout ! 2d average of pvarin 
     
    115114      !!              over a thickness phtbl. The bottom level is partially counted (pfrac). 
    116115      !! 
    117       !!-------------------------------------------------------------------- 
    118116      !!-------------------------- OUT ------------------------------------- 
    119117      REAL(wp), DIMENSION(jpi,jpj)    , INTENT(  out) :: pvarout      ! tbl property averaged over phtbl between level ktop and kbot 
     
    154152      !!              - fraction of the bottom level affected by the tbl 
    155153      !! 
    156       !!--------------------------------------------------------------------- 
    157154      !!-------------------------- OUT -------------------------------------- 
    158155      INTEGER,  DIMENSION(jpi,jpj)    , INTENT(  out) :: kbot   ! bottom level of the top boundary layer 
     
    209206      !! ** Purpose : compute bottom level of the isf top boundary layer 
    210207      !! 
    211       !!-------------------------------------------------------------------- 
    212208      !!-------------------------- OUT ------------------------------------- 
    213209      INTEGER,  DIMENSION(jpi,jpj)    , INTENT(  out) :: kbot   ! bottom level of the top boundary layer 
     
    246242      !! ** Purpose : compute top level of the isf top boundary layer in case of an ice shelf parametrisation 
    247243      !! 
    248       !!-------------------------------------------------------------------- 
    249244      !!-------------------------- OUT ------------------------------------- 
    250245      INTEGER,  DIMENSION(jpi,jpj), INTENT(  out) :: ktop        ! top level affected by the ice shelf parametrisation 
Note: See TracChangeset for help on using the changeset viewer.