Ignore:
Timestamp:
Dec 28, 2018 5:58:49 PM (2 years ago)
Author:
kanani
Message:

Bugfix: replace simulated_time by time_since_reference_point where required

File:
1 edited

Legend:

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

    r3579 r3646  
    2525! -----------------
    2626! $Id$
     27! Bugfix: use time_since_reference_point instead of simulated_time (relevant
     28! when using wall/soil spinup)
     29!
     30! 3579 2018-11-29 15:32:39Z suehring
    2731! - Bugfix in calculation of turbulence scaling parameters for turbulence
    2832!   generator in case of topography
     
    10541058    USE control_parameters,                                                    &
    10551059        ONLY:  child_domain, dt_3d, intermediate_timestep_count,               &
    1056                nesting_offline, rans_mode, simulated_time, volume_flow_initial
     1060               nesting_offline, rans_mode, time_since_reference_point,         &
     1061               volume_flow_initial
    10571062
    10581063    USE grid_variables,                                                        &
     
    10871092!
    10881093!-- Initial value of fu, fv, fw
    1089     IF ( simulated_time == 0.0_wp .AND. .NOT. velocity_seed_initialized )  THEN
     1094    IF ( time_since_reference_point == 0.0_wp .AND. .NOT. velocity_seed_initialized )  THEN
    10901095       CALL stg_generate_seed_yz( nuy, nuz, buy, buz, fu_yz, id_stg_left )
    10911096       CALL stg_generate_seed_yz( nvy, nvz, bvy, bvz, fv_yz, id_stg_left )
Note: See TracChangeset for help on using the changeset viewer.