Changeset 4029 for palm/trunk/SOURCE/chemistry_model_mod.f90

Timestamp:

Jun 14, 2019 2:04:35 PM (5 years ago)

Author:

raasch

Message:

bugfix: decycling of chemistry species after nesting data transfer, exchange of ghost points and boundary conditions separated for chemical species and SALSA module, nest_chemistry option removed, netcdf variable NF90_NOFILL is used as argument instead of 1 in calls to NF90_DEF_VAR_FILL

File:

• palm/trunk/SOURCE/chemistry_model_mod.f90 (modified) (4 diffs)

palm/trunk/SOURCE/chemistry_model_mod.f90

@@ -27 +27 @@
 ! -----------------
 ! $Id$
+! nest_chemistry option removed
+! 
+! 4004 2019-05-24 11:32:38Z suehring
 ! in subroutine chem_parin check emiss_lod / mod_emis only
 ! when emissions_anthropogenic is activated in namelist (E.C. Chan)
@@ -374 +377 @@
     SAVE
 
-    LOGICAL ::  nest_chemistry = .TRUE.  !< flag for nesting mode of chemical species, independent on parent or not
-
     REAL(kind=wp), ALLOCATABLE, DIMENSION(:,:,:,:), TARGET ::  spec_conc_1  !< pointer for swapping of timelevels for conc
     REAL(kind=wp), ALLOCATABLE, DIMENSION(:,:,:,:), TARGET ::  spec_conc_2  !< pointer for swapping of timelevels for conc
@@ -466 +467 @@
          3.25, -999., 2.8, 4.5/) 
 
-    PUBLIC nest_chemistry
     PUBLIC nreact
     PUBLIC nspec               !< number of gas phase chemical species including constant compound (e.g. N2)
@@ -2234 +2234 @@
          mode_emis,                        &
          my_steps,                         &
-         nest_chemistry,                   &
          rcntrl,                           &
          side_street_id,                   &