Changeset 15 for palm/trunk/SOURCE

Timestamp:

Feb 14, 2007 11:50:29 PM (18 years ago)

Author:

raasch

Message:

flush call removed from advec_particles

File:

• palm/trunk/SOURCE/advec_particles.f90 (modified) (1 diff)

palm/trunk/SOURCE/advec_particles.f90

@@ -2928 +2928 @@
     ENDIF
     WRITE (9,*) '*** Request: ',new_maximum_number,' new_maximum_number(tails)'
-    CALL FLUSH_( 9 )
+!    CALL FLUSH_( 9 )
 
     tmp_tail(:,:,1:number_of_tails)  = &