Ignore:
Timestamp:
Nov 20, 2017 12:58:20 PM (4 years ago)
Author:
schwenkel
Message:

enable particle advection with grid stretching and some formatation changes in lpm

File:
1 edited

Legend:

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

    r2628 r2630  
    11481148                   WRITE( message_string, * ) 'PARTICLE VIOLATED CFL CRITERION'&
    11491149                   ': particle with id ',particles(n)%id,' will be deleted!'   
    1150                    CALL message( 'lpm_check_cfl', 'PA0500', 0, 1, 0, 6, 0 )
     1150                   CALL message( 'lpm_check_cfl', 'PA0475', 0, 1, 0, 6, 0 )
    11511151                   particles(n)%particle_mask= .FALSE.
    11521152                ENDIF
Note: See TracChangeset for help on using the changeset viewer.