Changeset 10bfff9 in flexpart.git

Timestamp:

Aug 23, 2019, 12:38:05 PM (5 years ago)

Author:

ronesy <rlt@…>

Branches:

master, 10.4.1_pesei, GFS_025, bugfixes+enhancements, dev, release-10, release-10.4.1, scaling-bug

Children:

f46b38d

Parents:

7952ca4

Message:

removed flush statement from concoutput_inversion

File:

• src/concoutput_inversion.f90 (modified) (1 diff)

src/concoutput_inversion.f90

@@ -355 +355 @@
                  & access='APPEND', iostat=ierr)
             write(unitrelnames,'(a)') areldate//areltime//'_'//anspec
-            !call flush(unit=unitrelnames)
-            flush(unit=unitrelnames)
             close(unitrelnames)
           endif