Changeset 2418 for palm/trunk/SOURCE

Timestamp:

Sep 6, 2017 3:24:24 PM (7 years ago)

Author:

suehring

Message:

remove comment

File:

• palm/trunk/SOURCE/lpm.f90 (modified) (2 diffs)

palm/trunk/SOURCE/lpm.f90

@@ -336 +336 @@
 !--             optimization is still possible.)
                 IF ( topography /= 'flat' .AND. k < nzb_max + 2 )  THEN
-                   CALL lpm_boundary_conds( 'walls' )!, i, j, k )
+                   CALL lpm_boundary_conds( 'walls' )
                 ENDIF
 !
@@ -346 +346 @@
 !--             the top or bottom boundary and delete those particles, which are
 !--             older than allowed
-                CALL lpm_boundary_conds( 'bottom/top' ) !, i, j, k )
+                CALL lpm_boundary_conds( 'bottom/top' )
 !
 !---            If not all particles of the actual grid cell have reached the