Changeset 1734


Ignore:
Timestamp:
Dec 2, 2015 12:17:12 PM (6 years ago)
Author:
raasch
Message:

no initial disturbances in case that the disturbance energy limit has been set zero

File:
1 edited

Legend:

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

    r1708 r1734  
    1919! Current revisions:
    2020! ------------------
    21 !
     21! no initial disturbances in case that the disturbance energy limit has been
     22! set zero
    2223!
    2324! Former revisions:
     
    15801581!-- Impose random perturbation on the horizontal velocity field and then
    15811582!-- remove the divergences from the velocity field at the initial stage
    1582     IF ( create_disturbances .AND. &
     1583    IF ( create_disturbances  .AND.  disturbance_energy_limit /= 0.0_wp  .AND.&
    15831584         TRIM( initializing_actions ) /= 'read_restart_data'  .AND.  &
    15841585         TRIM( initializing_actions ) /= 'cyclic_fill' )  THEN
Note: See TracChangeset for help on using the changeset viewer.