| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| integer, | public | :: | NAMINDEX | ||||
| integer, | public | :: | NBCOEFF | ||||
| real, | public, | DIMENSION(JPNBCOEFFMAX) | :: | XCOEFF | |||
| integer, | public, | DIMENSION(JPNBCOEFFMAX) | :: | NEFINDEX | |||
| type(PRONOSVAR_T), | public, | POINTER | :: | NEXT | 
TYPE PRONOSVAR_T
  INTEGER                        :: NAMINDEX ! pronostic name is CNAMES(NAMINDEX)
!
  INTEGER                        :: NBCOEFF  ! number of coeff in agreg. equation
!                                      
  REAL,   DIMENSION(JPNBCOEFFMAX):: XCOEFF   ! agregation coeff array
!
  INTEGER,DIMENSION(JPNBCOEFFMAX):: NEFINDEX ! array of index on the EMISSVAR_T array
!
  TYPE(PRONOSVAR_T), POINTER     :: NEXT ! To build a PRONOSVAR_T link list
END TYPE PRONOSVAR_T