Extent Derived Type

type, public :: Extent


Components

Type Visibility Attributes Name Initial
real(kind=float), public :: area

surface area (m2)
real(kind=float), public, ALLOCATABLE :: balance(:)
real(kind=float), public, ALLOCATABLE :: canopy(:)
character(len=1000), public :: filebalance
character(len=1000), public :: filecanopy
character(len=1000), public :: fileice
character(len=1000), public :: filemeteo
character(len=1000), public :: fileplants
character(len=1000), public :: filesediment
character(len=1000), public :: filesnow
real(kind=float), public, ALLOCATABLE :: ice(:)
character(len=100), public :: id
type(grid_integer), public :: mask
real(kind=float), public, ALLOCATABLE :: meteo(:)
character(len=100), public :: name
real(kind=float), public, ALLOCATABLE :: plants(:)
real(kind=float), public, ALLOCATABLE :: sediment(:)
real(kind=float), public, ALLOCATABLE :: snow(:)
integer(kind=short), public :: unitbalance
integer(kind=short), public :: unitcanopy
integer(kind=short), public :: unitice
integer(kind=short), public :: unitmeteo
integer(kind=short), public :: unitplants
integer(kind=short), public :: unitsediment
integer(kind=short), public :: unitsnow

Source Code

TYPE Extent   !PRIVATE
   CHARACTER (LEN = 100) :: id
   CHARACTER (LEN = 100) :: name
   TYPE (grid_integer) :: mask
   REAL (KIND = float) :: area !!surface area (m2)
   !file unit
   INTEGER (KIND = short) :: unitmeteo 
   INTEGER (KIND = short) :: unitbalance
   INTEGER (KIND = short) :: unitsnow
   INTEGER (KIND = short) :: unitice
   INTEGER (KIND = short) :: unitsediment
   INTEGER (KIND = short) :: unitcanopy
   INTEGER (KIND = short) :: unitplants
   !file name
   CHARACTER (LEN = 1000) :: filemeteo
   CHARACTER (LEN = 1000) :: filebalance
   CHARACTER (LEN = 1000) :: filesnow
   CHARACTER (LEN = 1000) :: fileice
   CHARACTER (LEN = 1000) :: filesediment
   CHARACTER (LEN = 1000) :: filecanopy
   CHARACTER (LEN = 1000) :: fileplants
   !average values
   REAL (KIND = float), ALLOCATABLE :: meteo (:)
   REAL (KIND = float), ALLOCATABLE :: balance (:)
   REAL (KIND = float), ALLOCATABLE :: snow (:)
   REAL (KIND = float), ALLOCATABLE :: ice (:)
   REAL (KIND = float), ALLOCATABLE :: sediment (:)
   REAL (KIND = float), ALLOCATABLE :: canopy (:)
   REAL (KIND = float), ALLOCATABLE :: plants (:)
END TYPE Extent