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 32 for trunk/NEMO/OPA_SRC/DYN/dynnxt.F90 – NEMO

Ignore:
Timestamp:
2004-02-17T10:20:15+01:00 (20 years ago)
Author:
opalod
Message:

CT : UPDATE001 : First major NEMO update

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/NEMO/OPA_SRC/DYN/dynnxt.F90

    r3 r32  
    3535      !!      After velocity is compute using a leap-frog scheme environment: 
    3636      !!         (ua,va) = (ub,vb) + 2 rdt (ua,va) 
    37       !!      Note that if "key_dynspg_fsc" defined, the time stepping  
    38       !!      has already been performed in dynspg.F routine 
     37      !!      Note that if lk_dynspg_fsc=T, the time stepping has already been 
     38      !!      performed in dynspg module 
    3939      !!      Time filter applied on now horizontal velocity to avoid the 
    4040      !!      divergence of two consecutive time-steps and swap of dynamics 
Note: See TracChangeset for help on using the changeset viewer.