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

    r2233 r2259  
    2525! -----------------
    2626! $Id$
     27! Implemented synthetic turbulence generator
     28!
     29! 2233 2017-05-30 18:08:54Z suehring
    2730!
    2831! 2232 2017-05-30 17:47:52Z suehring
     
    315318    USE statistics,                                                            &
    316319        ONLY:  hom, hom_sum, pr_palm, region, statistic_regions
     320
     321    USE synthetic_turbulence_generator_mod,                                    &
     322        ONLY:  stg_parin
    317323
    318324    USE urban_surface_mod,                                                     &
     
    605611!--       if required
    606612          CALL flight_parin
    607 
     613!
     614!--       Check if synthetic turbulence generator is used and read stg_par if
     615!--       required
     616          CALL stg_parin
    608617!
    609618!--       Read user-defined variables
Note: See TracChangeset for help on using the changeset viewer.