Go to the source code of this file.
|
subroutine | grow (ispec, heightcl, lightcl, srvinhl, minhc, thiscell) |
| Grow.
|
|
◆ grow()
subroutine grow |
( |
integer, intent(in) | ispec, |
|
|
integer, intent(in) | heightcl, |
|
|
integer, intent(in) | lightcl, |
|
|
real, intent(in) | srvinhl, |
|
|
integer, intent(in) | minhc, |
|
|
type(currstateincell) | thiscell ) |
Grow.
Calculates the growth from one height class to the others
- gets the precalculated growth in the given height and light class
- calculates based on this precalculated growth rate the lower and upper height of the trees of this height class after they have grown
- determines which proportion of the trees enters which new height class
- updates the tree numbers in the height classes accordingly, by multiplying the proportions with the tree numbers in this height and light class
USE: All_par
- IN:
- Parameters
-
ispec | : species index |
heightcl | height class |
lightcl | : light class |
srvinhl | : remaining individuals per spec/height/light class
|
minhc | : lowest height class (0 for dispersal, 1 for local simus) |
thiscell | : state in current cell |
- FROM All_par
- specCl(maxspc): TYPE(SpecPropertiesInCl): species properties in light- and height classes
- hcwidth:REAL : height class width (above birht), in m
- birht: REAL: bottom height of heigth class 1, in m
- maxhc: INTEGER : maximum number of height classes
- CurrStateInCell: TYPE: describing the current state in the cell
- OUT:
- Parameters
-
thiscell | : state in current cell |
- CALLED FROM:
Definition at line 31 of file Grow.f90.