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

    r850 r851  
    44! Current revisions:
    55! ------------------
    6 !
     6! Bugfix: resetting of particle_mask and tail mask moved from routine
     7! lpm_exchange_horiz to here (end of sub-timestep loop)
    78!
    89! Former revisions:
     
    238239       ENDIF
    239240
     241!
     242!--    Initialize variables for the next (sub-) timestep, i.e. for marking those
     243!--    particles to be deleted after the timestep
     244       particle_mask     = .TRUE.
     245       deleted_particles = 0
     246
     247       IF ( use_particle_tails )  THEN
     248          tail_mask     = .TRUE.
     249       ENDIF
     250       deleted_tails = 0
     251
     252
    240253       IF ( dt_3d_reached )  EXIT
    241254
Note: See TracChangeset for help on using the changeset viewer.