Ignore:
Timestamp:
Jun 8, 2017 9:09:11 AM (4 years ago)
Author:
gronemeier
Message:

Implemented synthetic turbulence generator

File:
1 edited

Legend:

Unmodified
Added
Removed
  • palm/trunk/SOURCE/modules.f90

    r2256 r2259  
    2525! -----------------
    2626! $Id$
     27! Implemented synthetic turbulence generator
     28!
     29! 2256 2017-06-07 13:58:08Z suehring
    2730! Change default value of zeta_min to -20
    2831! Increase dimension for wall_heatflux, etc.
     
    11651168    LOGICAL ::  stop_dt = .FALSE.                            !<
    11661169    LOGICAL ::  synchronous_exchange = .FALSE.               !<
     1170    LOGICAL ::  synthetic_turbulence_generator = .FALSE.     !< flag for synthetic turbulence generator module
    11671171    LOGICAL ::  terminate_run = .FALSE.                      !<
    11681172    LOGICAL ::  transpose_compute_overlap = .FALSE.          !<
Note: See TracChangeset for help on using the changeset viewer.