| 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