Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
integer, | public, | POINTER, DIMENSION (:) | :: | NIRRINUM | |||
logical, | public, | POINTER, DIMENSION(:) | :: | LIRRIGATE | |||
logical, | public, | POINTER, DIMENSION(:) | :: | LIRRIDAY | |||
real, | public, | POINTER, DIMENSION(:) | :: | XTHRESHOLDSPT |
TYPE AGRI_t
!
INTEGER, POINTER, DIMENSION (:) :: NIRRINUM
! Stage for Irrigation (4 stages)
!
LOGICAL, POINTER,DIMENSION(:) :: LIRRIGATE
! True if irrigation performed
!
LOGICAL, POINTER,DIMENSION(:) :: LIRRIDAY
! True if irrigation occurs during present day
!
REAL, POINTER, DIMENSION(:) :: XTHRESHOLDSPT
! Spatialized threshold
END TYPE AGRI_t