13 integer_m,
PARAMETER ::
jpradcw=2
14 integer_m,
PARAMETER ::
jpradce=2
16 integer_m,
PARAMETER ::
jpradfw=1
17 integer_m,
PARAMETER ::
jpradfe=1
integer(kind=jpim), parameter jpradfw
integer(kind=jpim), parameter jpradct
integer(kind=jpim), parameter jpradce
integer(kind=jpim), parameter jpradcw
integer(kind=jpim), parameter jpradfe