18 INTEGER(KIND=JPIM),
PARAMETER ::
jpmxle=200
19 INTEGER(KIND=JPIM),
PARAMETER ::
jpmxgl=2056
20 INTEGER(KIND=JPIM),
PARAMETER ::
jpfppyx=17
integer(kind=jpim), parameter jpmxgl
integer(kind=jpim), parameter jpmxle
integer(kind=jpim), parameter jpfppyx
integer(kind=jpim), parameter jpnulnam