source: LMDZ5/trunk/libf/phymar/yoerrtbg2.F90 @ 4116

Last change on this file since 4116 was 2089, checked in by Laurent Fairhead, 10 years ago

Inclusion de la physique de MAR


Integration of MAR physics

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.