LMDZ
yoerrtbg2.F90
Go to the documentation of this file.
1 MODULE yoerrtbg2
2 
3 #include "tsmbkind.h"
4 
5 USE parrrtm
6 
7 
8 IMPLICIT NONE
9 
10 SAVE
11 
12 ! -------------------------------------------------------------------
13 
14 ! -------------------------------------------------------------------
15 
16 real_b :: corr1(0:200)
17 real_b :: corr2(0:200)
18 
19 ! -----------------------------------------------------------------
20 ! * E.C.M.W.F. PHYSICS PACKAGE ** RRTM LW RADIATION **
21 
22 ! J.-J. MORCRETTE E.C.M.W.F. 98/07/14
23 
24 ! NAME TYPE PURPOSE
25 ! ---- : ---- : ---------------------------------------------------
26 ! CORR1 : REAL :
27 ! CORR2 : REAL :
28 ! -------------------------------------------------------------------
29 END MODULE yoerrtbg2
30 
31 
real(kind=jprb), dimension(0:200) corr2
Definition: yoerrtbg2.F90:16
real(kind=jprb), dimension(0:200) corr1
Definition: yoerrtbg2.F90:15