Changeset 4029 for palm/trunk/SOURCE/chemistry_model_mod.f90
- Timestamp:
- Jun 14, 2019 2:04:35 PM (5 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/chemistry_model_mod.f90
r4004 r4029 27 27 ! ----------------- 28 28 ! $Id$ 29 ! nest_chemistry option removed 30 ! 31 ! 4004 2019-05-24 11:32:38Z suehring 29 32 ! in subroutine chem_parin check emiss_lod / mod_emis only 30 33 ! when emissions_anthropogenic is activated in namelist (E.C. Chan) … … 374 377 SAVE 375 378 376 LOGICAL :: nest_chemistry = .TRUE. !< flag for nesting mode of chemical species, independent on parent or not377 378 379 REAL(kind=wp), ALLOCATABLE, DIMENSION(:,:,:,:), TARGET :: spec_conc_1 !< pointer for swapping of timelevels for conc 379 380 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/) 467 468 468 PUBLIC nest_chemistry469 469 PUBLIC nreact 470 470 PUBLIC nspec !< number of gas phase chemical species including constant compound (e.g. N2) … … 2234 2234 mode_emis, & 2235 2235 my_steps, & 2236 nest_chemistry, &2237 2236 rcntrl, & 2238 2237 side_street_id, &
Note: See TracChangeset
for help on using the changeset viewer.