Changeset 75a4ded in flexpart.git for src/releaseparticles.f90


Ignore:
Timestamp:
Feb 9, 2017, 5:01:27 PM (7 years ago)
Author:
Sabine <sabine.eckhardt@…>
Branches:
master, 10.4.1_pesei, GFS_025, bugfixes+enhancements, dev, release-10, release-10.4.1, scaling-bug, univie
Children:
6473ad3
Parents:
d56bfae
Message:

BUGFIX: ind_r should be treated the same for 1,3 and 4

File:
1 edited

Legend:

Unmodified
Added
Removed
  • src/releaseparticles.f90

    r5844866 r75a4ded  
    336336  !Af ind_rel is defined in readcommand.f
    337337
    338             if (ind_rel .eq. 1) then
     338            if ((ind_rel .eq. 1).or.(ind_rel .eq. 3).or.(ind_rel .eq. 4)) then
    339339
    340340  ! Interpolate the air density
Note: See TracChangeset for help on using the changeset viewer.
hosted by ZAMG