New URL for NEMO forge!   http://forge.nemo-ocean.eu

Since March 2022 along with NEMO 4.2 release, the code development moved to a self-hosted GitLab.
This present forge is now archived and remained online for history.
Changeset 6381 for trunk – NEMO

Changeset 6381 for trunk


Ignore:
Timestamp:
2016-03-10T15:12:49+01:00 (8 years ago)
Author:
acc
Message:

Trunk only. #1691 Add missing call to ldf_dyn in step.F90 needed for time-varying eddy viscosity coefficients

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/NEMOGCM/NEMO/OPA_SRC/step.F90

    r6140 r6381  
    172172         ENDIF 
    173173      ENDIF 
    174       !                                               ! eddy diffusivity coeff. and/or eiv coeff. 
    175       IF( l_ldftra_time .OR. l_ldfeiv_time )   CALL ldf_tra( kstp )  
     174      !                                                                   ! eddy diffusivity coeff. 
     175      IF( l_ldftra_time .OR. l_ldfeiv_time )   CALL ldf_tra( kstp )       !       and/or eiv coeff. 
     176      IF( l_ldfdyn_time                    )   CALL ldf_dyn( kstp )       ! eddy viscosity coeff.  
    176177 
    177178      !>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> 
     
    203204 
    204205      IF(  lk_asminc .AND. ln_asmiau .AND. ln_dyninc )   & 
    205                          CALL dyn_asm_inc   ( kstp )  ! apply dynamics assimilation increment 
     206               &         CALL dyn_asm_inc   ( kstp )  ! apply dynamics assimilation increment 
    206207      IF( lk_bdy     )   CALL bdy_dyn3d_dmp ( kstp )  ! bdy damping trends 
    207208#if defined key_agrif 
Note: See TracChangeset for help on using the changeset viewer.