Index: branches/petra/src/com_mod.f90
===================================================================
--- trunk/src/com_mod.f90	(revision 30)
+++ branches/petra/src/com_mod.f90	(revision 36)
@@ -1,2 +1,25 @@
+!**********************************************************************
+! Copyright 1998-2015                                                 *
+! Andreas Stohl, Petra Seibert, A. Frank, Gerhard Wotawa,             *
+! Caroline Forster, Sabine Eckhardt, John Burkhart, Harald Sodemann   *
+!                                                                     *
+! This file is part of FLEXPART.                                      *
+!                                                                     *
+! FLEXPART is free software: you can redistribute it and/or modify    *
+! it under the terms of the GNU General Public License as published by*
+! the Free Software Foundation, either version 3 of the License, or   *
+! (at your option) any later version.                                 *
+!                                                                     *
+! FLEXPART is distributed in the hope that it will be useful,         *
+! but WITHOUT ANY WARRANTY; without even the implied warranty of      *
+! MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the       *
+! GNU General Public License for more details.                        *
+!                                                                     *
+! You should have received a copy of the GNU General Public License   *
+! along with FLEXPART.  If not, see <http://www.gnu.org/licenses/>.   *
+!**********************************************************************
+
+module com_mod
+
 !*******************************************************************************
 !        Include file for particle diffusion model FLEXPART                    *
@@ -7,9 +30,8 @@
 !        June 1996                                                             *
 !                                                                              *
-!        Last update:15 August 2013 IP                                         *
+!        Modifications: 15 August 2013 IP, 
+!        2/2015 PS, add incremental deposition switch
 !                                                                              *
 !*******************************************************************************
-
-module com_mod
 
   use par_mod, only: dp, numpath, maxnests, maxageclass, maxspec, ni, &
@@ -69,5 +91,5 @@
   integer :: mquasilag,nested_output,ind_source,ind_receptor
   integer :: ind_rel,ind_samp,ioutputforeachrelease,linit_cond,surf_only
-  logical :: turbswitch
+  logical :: turbswitch, ldep_incr
 
   ! ctl      factor, by which time step must be smaller than Lagrangian time scale
@@ -98,4 +120,5 @@
   ! nested_output: 0 no, 1 yes
   ! turbswitch              determines how the Markov chain is formulated
+  ! ldep_incr: .true. incremental deposition, .false. accumulated deposition
 
   ! ind_rel and ind_samp  are used within the code to change between mass and mass-mix (see readcommand.f)
@@ -136,5 +159,5 @@
   character :: compoint(1001)*45
   integer :: numpoint
-  !sec, now dynamically allocated:
+  !SE, now dynamically allocated:
   ! ireleasestart(maxpoint),ireleaseend(maxpoint)
   !      real xpoint1(maxpoint),ypoint1(maxpoint)
@@ -155,5 +178,5 @@
   real :: rgs(maxspec,5,numclass),rlu(maxspec,5,numclass)
   real :: rm(maxspec),dryvel(maxspec),kao(maxspec),ohreact(maxspec)
-  ! se  it is possible to associate a species with a second one to make transfer from gas to aerosol
+  ! SE  it is possible to associate a species with a second one to make transfer from gas to aerosol
   integer :: spec_ass(maxspec)
 
@@ -549,5 +572,5 @@
   real :: dxoutn,dyoutn,outlon0n,outlat0n,xoutshiftn,youtshiftn
   !real outheight(maxzgrid),outheighthalf(maxzgrid)
-  logical :: DEP,DRYDEP,DRYDEPSPEC(maxspec),WETDEP,OHREA,ASSSPEC
+  logical :: dep,drydep,drydepspec(maxspec),wetdep,ohrea,assspec
 
   ! numxgrid,numygrid       number of grid points in x,y-direction
@@ -562,10 +585,10 @@
   ! outheight [m]           upper levels of the output grid
   ! outheighthalf [m]       half (middle) levels of the output grid cells
-  ! DEP                     .true., if either dry or wet depos. is switched on
-  ! DRYDEP                  .true., if dry deposition is switched on
-  ! DRYDEPSPEC              .true., if dry deposition is switched on for that species
-  ! WETDEP                  .true., if wet deposition is switched on
-  ! OHREA                   .true., if OH reaction is switched on
-  ! ASSSPEC                 .true., if there are two species asscoiated
+  ! dep                     .true., if either dry or wet depos. is switched on
+  ! drydep                  .true., if dry deposition is switched on
+  ! drydepspec              .true., if dry deposition is switched on for that species
+  ! wetdep                  .true., if wet deposition is switched on
+  ! ohrea                   .true., if oh reaction is switched on
+  ! assspec                 .true., if there are two species asscoiated
   !                    (i.e. transfer of mass between these two occurs
 
