Changes in src/concoutput.f90 [08a38b5:20963b1] in flexpart.git

File:

• src/concoutput.f90 (modified) (2 diffs)

src/concoutput.f90

@@ -140 +140 @@
   close(unitdates)  
 
+  ! Overwrite existing dates file on first call, later append to it
+  ! This fixes a bug where the dates file kept growing across multiple runs
   IF (init) THEN
     file_stat='OLD'
@@ -313 +315 @@
                    drygridsigma(ix,jy)* &
                    sqrt(real(nclassunc))
-125           drygridsigmatotal=drygridsigmatotal+ &
+              drygridsigmatotal=drygridsigmatotal+ &
                    drygridsigma(ix,jy)
             endif