!! Simulate plants grow and climate interaction (TODO) !|author: Giovanni Ravazzani ! license: GPL ! !### History ! ! current version 1.0 - 6th May 2019 ! ! | version | date | comment | ! |----------|-------------|----------| ! | 1.0 | 6/May/2019 | Original code | ! !### License ! license: GNU GPL ! !### Module Description ! Routines to model plants grow and climate interaction (TODO) ! MODULE PlantsPhenology ! Modules used: USE DataTypeSizes, ONLY : & ! Imported Type Definitions: short, float IMPLICIT NONE !global routines: PUBLIC :: AccGrowingDegreeDay !======= CONTAINS !======= !============================================================================== !| Description: ! compute accumulated growing degree day (GDD), sum of growing degree day ! over days. Start accumulate when daily GDD > 0 ! SUBROUTINE AccGrowingDegreeDay & ! () IMPLICIT NONE RETURN END SUBROUTINE AccGrowingDegreeDay END MODULE PlantsPhenology