TYPE EMIS_GR_FIELD_t
!
!
INTEGER :: NEMIS_GR_NBR
! ! number of chemical pgd fields chosen by user
CHARACTER(LEN=3) , DIMENSION(:), POINTER:: CEMIS_GR_AREA
! ! areas where chemical pgd fields are defined
! ! 'ALL' : everywhere
! ! 'SEA' : where sea exists
! ! 'LAN' : where land exists
! ! 'WAT' : where inland water exists
! ! 'NAT' : where natural or agricultural areas exist
! ! 'TWN' : where town areas exist
! ! 'STR' : where streets are present
! ! 'BLD' : where buildings are present
! !
CHARACTER(LEN=40), DIMENSION(:), POINTER:: CEMIS_GR_NAME
! ! name of the chemical pgd fields (emitted species)
!
INTEGER, DIMENSION(:), POINTER:: NEMIS_GR_TIME ! emission time
!
REAL, DIMENSION(:,:,:), POINTER:: XEMIS_GR_FIELDS ! emission pgd fields values
!
INTEGER :: NEMISPEC_NBR ! Number of chemical species
!
TYPE(EMISSVAR_T), DIMENSION(:), POINTER :: TSEMISS ! Offline emission struct array
!
TYPE(PRONOSVAR_T), POINTER :: TSPRONOSLIST ! Head pointer on pronostic
! variables list
!-------------------------------------------------------------------------------
!
END TYPE EMIS_GR_FIELD_t