Changeset 0a94e13 in flexpart.git for src/partoutput_mpi.f90

Timestamp:

May 6, 2019, 11:43:21 AM (5 years ago)

Author:

Espen Sollum ATMOS <eso@…>

Branches:

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

Children:

0c8c7f2

Parents:

328fdf9

Message:

Added ipout=3 option for time averaged particle output

File:

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

src/partoutput_mpi.f90

@@ -78 +78 @@
   !**************************************
 
-  if (ipout.eq.1) then
+  if (ipout.eq.1.or.ipout.eq.3) then
     open(unitpartout,file=path(2)(1:length(2))//'partposit_'//adate// &
          atime,form='unformatted',status=file_stat,position='append')