c     ------------------------------------------------------------------
c      file 'm1flag.inc'

c      this common block contains logical variables for the control of
c      initializations, printing of output, etc.

c     + + + VARIABLE DECLARATIONS + + +

      logical          am0ifl
      logical          am0cif
      logical          am0eif
      logical          am0cgf
      logical          am0dif
      integer          am0hfl
      integer          am0sfl
      integer          am0tfl
      integer          am0cfl
      integer          am0dfl
      integer          am0efl
      logical          am0gdf
      logical          am0til
      integer          am0hrvfl
      integer          am0drmfl
      integer          am0drlfl

      common / m1flag /
     l                  am0ifl, am0eif, am0cgf, am0cif, am0dif, am0hfl,
     l                  am0gdf, am0til, am0hrvfl,am0drmfl,am0drlfl,
     i                  am0sfl, am0tfl, am0cfl, am0dfl, am0efl

c     + + + VARIABLE DEFINITIONS + + +

c     am0ifl - flag to run initialization of submodels
c
c               values   -    .true.     .false.
c
c            - If variable is set to .true. then run
c              initialization subroutines.
c
c     am0eif - flag to run initialization of EROSION
c              submodel
c
c               values   -    .true.     .false.
c
c            - If variable is set to .true. then run
c              initialization subroutines.
c
c     am0cif - flag to run initialization of CROP
c              submodel at each crop planting
c
c               values   -    .true.     .false.
c
c            - If variable is set to .true. then run
c              initialization subroutines.
c
c     am0cgf - flag to run CROP growth if between plant
c              and harvest
c
c               values   -    .true.     .false.
c
c            - If variable is set to .true. then run
c              growth subroutines.
c
c     am0dif - flag to run initialization of DECOMP
c              submodel at the start of simulation and harvest
c
c               values   -    .true.     .false.
c
c            - If variable is set to .true. then run
c              initialization subroutines.
c
c     am0hfl - flag to print HYDROlogy output
c
c                values  -    0, 1, 2, 3, 4,,5 ,6 ,7
c
c            - If variable is set tothe following then print
c              a detailed output from HYDROlogy submodel
c
c                  0 = no output
c                  1 = daily
c                  2 = hourly
c                  3 = soil temperature
c                  4 = daily and hourly
c                  5 = daily and soil temperature
c                  6 = hourly and soil temperature
c                  7 = daily, hourly, and soil temperature

c     am0sfl - flag to print SOIL output
c
c                values  -    0, 1
c
c            - If am0sfl = 1 then print detailed output,
c              if am0sfl = 0 then print no output

c     am0tfl - flag to print MANAGEMENT (TILLAGE) output

c                values  -   0, 1

c            - If am0tfl = 1 then print detailed output,
c              if am0tfl = 0 then print no output

c     am0cfl - flag to print CROP output

c                values  -    0, 1

c            - If am0cfl = 1 then print detailed output,
c              if am0cfl = 0 then print no output

c     am0dfl - flag to print DECOMP output

c                values  -    0, 1, 2, 3

c            - If am0dfl = 1 then print detailed output for above
c                            ground residue,
c            - If am0dfl = 2 then print detailed output for below
c                            ground residue,
c            - If am0dfl = 3 then print detailed output for both
c                            above and below ground residue,
c            - If am0dfl = 0 then print no output

c     am0efl - flag to print EROSION output

c                values  -    0, 1

c            - If am0efl = 1 then print detailed output,
c              if am0efl = 0 then print no output

c     am0gdf - flag to determine if grid has been calculated

c                values  -    .true., .false.

c            - If am0gdf = .true., determine if points are within acct region
c              if am0gdf = .false., do not

c     am0til - flag to determine if surfce has been updated by management

c                values  -    .true., .false.

c            - If am0til = .true., tillage has occurred
c              if am0til = .false., not

c    am0hrvfl - flag to determine if the harvest operation is killing
c               a perennial or annual crop or if there is a harvest
c               of a perennial crop but the crop is not killed.

c                values  -  0 - perennial crop no kill
c                           1 - annual crop which is killed
c                           2 - perennial crop which is killed
c                type    -  integer
c     am0drmfl - flag indicating the onset of the dormancy period
c                am0drmfl = 0 --> non-dormant period
c                am0drmfl = 1 --> dormant period
c
c     am0drlfl - flag indicating whether crops growing in a simulation region
c                can experience a period of dormancy
c                 am0drlfl = 0 --> a winter or perennial crop will not
c                                  experience dormancy
c                 am0drlfl = 1 --> a winter or perennial crop may
c                                  experience dormancy
c
c
c-----------------------------------------------------------------------