Changeset 12742


Ignore:
Timestamp:
2020-04-12T14:46:30+02:00 (6 months ago)
Author:
clem
Message:

all sette tests passed

Location:
NEMO/branches/2020/r4.0-HEAD_r12713_clem_dan_fixcpl
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • NEMO/branches/2020/r4.0-HEAD_r12713_clem_dan_fixcpl/cfgs/SHARED/namelist_ice_ref

    r12741 r12742  
    178178&namthd_pnd     !   Melt ponds 
    179179!------------------------------------------------------------------------------ 
    180    ln_pnd           = .false.         !  activate melt ponds or not 
    181      ln_pnd_H12     = .false.         !  activate evolutive melt ponds (from Flocco et al 2007,2010 & Holland et al 2012) 
     180   ln_pnd           = .true.         !  activate melt ponds or not 
     181     ln_pnd_H12     = .true.         !  activate evolutive melt ponds (from Flocco et al 2007,2010 & Holland et al 2012) 
    182182       ln_pnd_lids  = .true.          !  ponds with frozen lids 
    183183       ln_pnd_flush = .true.          !  ponds flushing trhu the ice   
     
    187187       rn_apnd      =   0.2           !     prescribed pond fraction, at Tsu=0 degC 
    188188       rn_hpnd      =   0.05          !     prescribed pond depth,    at Tsu=0 degC 
    189      ln_pnd_alb     = .false.         !  melt ponds affect albedo or not 
     189     ln_pnd_alb     = .true.         !  melt ponds affect albedo or not 
    190190/ 
    191191!------------------------------------------------------------------------------ 
     
    252252      iiceprt       =  10             !     i-index for debug 
    253253      jiceprt       =  10             !     j-index for debug 
    254    ln_icediacvg     = .false.         !  check convergence of ice rheology (outputs: file ice_cvg.nc & variable uice_cvg) 
    255 / 
     254/ 
  • NEMO/branches/2020/r4.0-HEAD_r12713_clem_dan_fixcpl/src/OCE/SBC/sbccpl.F90

    r12733 r12742  
    837837 
    838838      ! Initialise ice fractions from last coupling time to zero (needed by Met-Office) 
     839#if defined key_si3 || defined key_cice 
    839840       a_i_last_couple(:,:,:) = 0._wp 
    840  
     841#endif 
    841842      !                                                      ! ------------------------- !  
    842843      !                                                      !      Ice Meltponds        !  
     
    22972298      ENDIF 
    22982299 
     2300#if defined key_si3 || defined key_cice 
    22992301      ! If this coupling was successful then save ice fraction for use between coupling points.  
    23002302      ! This is needed for some calculations where the ice fraction at the last coupling point  
     
    23062308         ENDIF 
    23072309      ENDIF 
     2310#endif 
    23082311 
    23092312      IF( ssnd(jps_fice1)%laction ) THEN 
Note: See TracChangeset for help on using the changeset viewer.