Changeset 4c64400 in flexpart.git for src/com_mod.f90

Timestamp:

Nov 8, 2016, 4:42:27 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:

c8fc724

Parents:

16b61a5

Message:

Bugfix for double precision dry deposition calculation. Added (hardcoded) option to not use output kernel. Version/date string updated.

File:

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

src/com_mod.f90

@@ -132 +132 @@
 
 !ZHG SEP 2015 wheather or not to read clouds from GRIB
-  logical :: readclouds
+  logical :: readclouds=.false.
 !ESO DEC 2015 whether or not both clwc and ciwc are present (if so they are summed)
-  logical :: sumclouds
+  logical :: sumclouds=.false.
 
   logical,dimension(maxnests) :: readclouds_nest, sumclouds_nest
@@ -743 +743 @@
 
   ! These variables are used to avoid having separate versions of
-  ! files in cases where differences with MPI version is minor (eso)
+  ! files in cases where differences with MPI version are minor (eso)
   !*****************************************************************
   integer :: mpi_mode=0 ! .gt. 0 if running MPI version