Changeset 328fdf9 in flexpart.git for src/init_domainfill.f90

Timestamp:

Apr 28, 2019, 7:53:42 PM (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:

0a94e13

Parents:

77783e3

Message:

bugfix: particles were lost at start of global domain filling run. Error in restarting domain filling run from particle dump

File:

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

src/init_domainfill.f90

@@ -414 +414 @@
 !***************************************************************************
 
-  if (ipin.eq.1) then
+  if ((ipin.eq.1).and.(.not.gdomainfill)) then
     open(unitboundcond,file=path(2)(1:length(2))//'boundcond.bin', &
          form='unformatted')