LMDZ
yoerrtrf.F90
Go to the documentation of this file.
1 MODULE yoerrtrf
2 
3 
4 #include "tsmbkind.h"
5 
6 IMPLICIT NONE
7 
8 SAVE
9 
10 ! -----------------------------------------------------------------
11 !* ** *YOERRTRF* - RRTM REFERENCE ATMOSPHERE
12 ! -----------------------------------------------------------------
13 
14 real_b , DIMENSION(59) :: pref
15 real_b , DIMENSION(59) :: preflog
16 real_b , DIMENSION(59) :: tref
17 
18 ! -----------------------------------------------------------------
19 ! * E.C.M.W.F. PHYSICS PACKAGE ** RRTM LW RADIATION **
20 
21 ! J.-J. MORCRETTE E.C.M.W.F. 98/01/15
22 
23 ! NAME TYPE PURPOSE
24 ! ---- : ---- : ---------------------------------------------------
25 ! PREF : REAL
26 ! PREFLOG: REAL
27 ! TREF : REAL
28 ! -----------------------------------------------------------------
29 END MODULE yoerrtrf
real(kind=jprb), dimension(59) tref
Definition: yoerrtrf.F90:15
real(kind=jprb), dimension(59) pref
Definition: yoerrtrf.F90:13
real(kind=jprb), dimension(59) preflog
Definition: yoerrtrf.F90:14