Ignore:
Timestamp:
2020-02-28T16:55:11+01:00 (15 months ago)
Author:
davestorkey
Message:

Preparation for new timestepping scheme #2390.
Main changes:

  1. Initial euler timestep now handled in stp and not in TRA/DYN routines.
  2. Renaming of all timestep parameters. In summary, the namelist parameter is now rn_Dt and the current timestep is rDt (and rDt_ice, rDt_trc etc).
  3. Renaming of a few miscellaneous parameters, eg. atfp → rn_atfp (namelist parameter used everywhere) and rau0 → rho0.

This version gives bit-comparable results to the previous version of the trunk.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • NEMO/trunk/src/OCE/FLO/flo4rk.F90

    r12377 r12489  
    130130         ! computation of Runge-Kutta factor 
    131131         DO jfl = 1, jpnfl 
    132             zrkxfl(jfl,jind) = rdt*zufl(jfl) 
    133             zrkyfl(jfl,jind) = rdt*zvfl(jfl) 
    134             zrkzfl(jfl,jind) = rdt*zwfl(jfl) 
     132            zrkxfl(jfl,jind) = rn_Dt*zufl(jfl) 
     133            zrkyfl(jfl,jind) = rn_Dt*zvfl(jfl) 
     134            zrkzfl(jfl,jind) = rn_Dt*zwfl(jfl) 
    135135         END DO 
    136136         IF( jind /= 4 ) THEN 
Note: See TracChangeset for help on using the changeset viewer.