source: dynamico_lmdz/aquaplanet/LMDZ5/libf/phymar/yoerrtbg2.F90 @ 4031

Last change on this file since 4031 was 3990, checked in by millour, 8 years ago

An updated LMDZ5 (based on LMDZ rev 2786) to play with.
EM

File size: 701 bytes
Line 
1MODULE YOERRTBG2
2
3#include "tsmbkind.h"
4
5USE PARRRTM
6
7
8IMPLICIT NONE
9
10SAVE
11
12!    -------------------------------------------------------------------
13
14!    -------------------------------------------------------------------
15
16REAL_B :: CORR1(0:200)
17REAL_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!    -------------------------------------------------------------------
29END MODULE YOERRTBG2
30
31
Note: See TracBrowser for help on using the repository browser.