Ignore:
Timestamp:
2019-06-03T15:04:56+02:00 (18 months ago)
Author:
rrenshaw
Message:

code fixes

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/UKMO/AMM15_v3_6_STABLE_package_reanalysis3/NEMOGCM/NEMO/OPA_SRC/ASM/asminc.F90

    r10728 r11070  
    4343   &  hmld_tref,       &    
    4444#if defined key_karaml 
    45    &  hmld_kara,       & 
     45   &  hmld_zint,       & 
    4646   &  ln_kara,         & 
    4747#endif    
     
    108108                                      !: 1) hmld      - Turbocline/mixing depth                           [W points] 
    109109                                      !: 2) hmlp      - Density criterion (0.01 kg/m^3 change from 10m)   [W points] 
    110                                       !: 3) hmld_kara - Kara MLD                                          [Interpolated] 
     110                                      !: 3) hmld_zint - Kara MLD                                          [Interpolated] 
    111111                                      !: 4) hmld_tref - Temperature criterion (0.2 K change from surface) [T points] 
    112112 
     
    518518#if defined key_karaml 
    519519                  IF ( ln_kara ) THEN 
    520                      z_mld = hmld_kara 
     520                     z_mld = hmld_zint 
    521521                  ELSE 
    522522                     CALL ctl_stop("Kara mixed layer not calculated as ln_kara=.false.") 
     
    12791279! 
    12801280!           ! change salinity down to mixed layer depth 
    1281 !                 mld=hmld_kara(ji,jj) 
     1281!                 mld=hmld_zint(ji,jj) 
    12821282! 
    12831283!           ! prevent small mld 
Note: See TracChangeset for help on using the changeset viewer.