Ignore:
Timestamp:
Mar 15, 2012 2:32:58 PM (10 years ago)
Author:
raasch
Message:

Bugfix: resetting of particle_mask and tail mask moved from routine lpm_exchange_horiz to routine lpm (end of sub-timestep loop)

File:
1 edited

Legend:

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

    r850 r851  
    44! Current revisions:
    55! ------------------
    6 !
     6! Bugfix: resetting of particle_mask and tail mask moved from end of this
     7! routine to lpm
    78!
    89! Former revisions:
     
    915916#endif
    916917
    917 !
    918 !-- Initialize variables for the next (sub-) timestep, i.e. for marking those
    919 !-- particles to be deleted after the timestep
    920     particle_mask     = .TRUE.
    921     deleted_particles = 0
    922 
    923     IF ( use_particle_tails )  THEN
    924        tail_mask     = .TRUE.
    925     ENDIF
    926     deleted_tails = 0
    927918
    928919 END SUBROUTINE lpm_exchange_horiz
Note: See TracChangeset for help on using the changeset viewer.