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/check_parameters.f90

    r2251 r2259  
    2020! Current revisions:
    2121! -----------------
    22 !  
     22!
    2323!
    2424! Former revisions:
    2525! -----------------
    2626! $Id$
     27! Implemented synthetic turbulence generator
     28!
     29! 2251 2017-06-06 15:10:46Z Giersch
    2730!
    2831! 2250 2017-06-06 15:07:12Z Giersch
     
    499502    USE subsidence_mod
    500503    USE statistics
     504    USE synthetic_turbulence_generator_mod,                                    &
     505        ONLY:  stg_check_parameters
    501506    USE transpose_indices
    502507    USE urban_surface_mod,                                                     &
     
    12071212    ENDIF
    12081213
     1214!
     1215!-- When synthetic turbulence generator is used, peform addtional checks
     1216    IF ( synthetic_turbulence_generator )  CALL stg_check_parameters
    12091217!
    12101218!-- When plant canopy model is used, peform addtional checks
Note: See TracChangeset for help on using the changeset viewer.