parrint.F90

Go to the documentation of this file.

MODULE parrint

USE parkind1  ,ONLY : jpim     ,jprb

IMPLICIT NONE

SAVE

!     PARAMETERS REQUIRED FOR RADIATION INTERPOLATION

INTEGER(KIND=JPIM), PARAMETER :: jpradcw=2
INTEGER(KIND=JPIM), PARAMETER :: jpradce=2
INTEGER(KIND=JPIM), PARAMETER :: jpradct=jpradcw+jpradce
INTEGER(KIND=JPIM), PARAMETER :: jpradfw=1
INTEGER(KIND=JPIM), PARAMETER :: jpradfe=1
END MODULE parrint