Changeset 4101 for palm/trunk/SOURCE/modules.f90

Timestamp:

Jul 17, 2019 3:14:26 PM (5 years ago)

Author:

gronemeier

Message:

timestep.f90:

• consider 2*Km within diffusion criterion as Km is considered twice within the diffusion of e,
• in RANS mode, instead of considering each wind component individually use the wind speed of 3d wind vector in CFL criterion
• do not limit the increase of dt based on its previous value in RANS mode

other:

• remove dt_old

File:

• palm/trunk/SOURCE/modules.f90 (modified) (2 diffs)

palm/trunk/SOURCE/modules.f90

@@ -25 +25 @@
 ! -----------------
 ! $Id$
+! remove old_dt
+! 
+! 4079 2019-07-09 18:04:41Z suehring
 ! + monotonic_limiter_z
 ! 
@@ -1492 +1495 @@
     REAL(wp) ::  multi_agent_system_end   = 9999999.9_wp       !< namelist parameter (see documentation)
     REAL(wp) ::  multi_agent_system_start = 0.0_wp             !< namelist parameter (see documentation)
-    REAL(wp) ::  old_dt = 1.0E-10_wp                           !< length of previous timestep
     REAL(wp) ::  omega = 7.29212E-5_wp                         !< namelist parameter
     REAL(wp) ::  omega_sor = 1.8_wp                            !< namelist parameter