Changeset 2418 for palm/trunk/SOURCE


Ignore:
Timestamp:
Sep 6, 2017 3:24:24 PM (7 years ago)
Author:
suehring
Message:

remove comment

File:
1 edited

Legend:

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

    r2417 r2418  
    336336!--             optimization is still possible.)
    337337                IF ( topography /= 'flat' .AND. k < nzb_max + 2 )  THEN
    338                    CALL lpm_boundary_conds( 'walls' )!, i, j, k )
     338                   CALL lpm_boundary_conds( 'walls' )
    339339                ENDIF
    340340!
     
    346346!--             the top or bottom boundary and delete those particles, which are
    347347!--             older than allowed
    348                 CALL lpm_boundary_conds( 'bottom/top' ) !, i, j, k )
     348                CALL lpm_boundary_conds( 'bottom/top' )
    349349!
    350350!---            If not all particles of the actual grid cell have reached the
Note: See TracChangeset for help on using the changeset viewer.