Changeset b5127f9 in flexpart.git for src/readcommand.f90

Timestamp:

Aug 4, 2017, 2:18:03 PM (7 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, univie

Children:

61e07ba, 1d072c0

Parents:

5184a7c

Message:

Fixed an inconsistency (serial vs parallel) with domain-filling option

File:

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

src/readcommand.f90

@@ -146 +146 @@
   ohfields_path="../../flexin/"
 
+  !Af set release-switch
+  WETBKDEP=.false.
+  DRYBKDEP=.false.
+
   ! Open the command file and read user options
   ! Namelist input first: try to read as namelist file
@@ -321 +325 @@
         ind_samp = 0
      endif
-  !Af set release-switch
-     WETBKDEP=.false.
-     DRYBKDEP=.false.
      select case (ind_receptor)
      case (1)  !  1 .. concentration at receptor