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 621 for trunk/NEMO – NEMO

Changeset 621 for trunk/NEMO


Ignore:
Timestamp:
2007-02-22T08:58:57+01:00 (17 years ago)
Author:
opalod
Message:

nemo_v2_bugfix_019 : CT : add initialization of sdvt(:,:) field to zero

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/NEMO/LIM_SRC/limdyn.F90

    r531 r621  
    300300      ENDIF 
    301301 
     302      !  Initialization 
    302303      usecc2 = 1.0 / ( ecc * ecc ) 
    303304      rhoco  = rau0 * cw 
     
    306307      cangvg = COS( angvg ) 
    307308      pstarh = pstar / 2.0 
     309      sdvt(:,:) = 0.e0 
    308310 
    309311      !  Diffusion coefficients. 
Note: See TracChangeset for help on using the changeset viewer.