source: dynamico_lmdz/aquaplanet/LMDZ5/libf/phymar/yoerrtrf.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: 788 bytes
Line 
1MODULE YOERRTRF
2
3
4#include "tsmbkind.h"
5
6IMPLICIT NONE
7
8SAVE
9
10!     -----------------------------------------------------------------
11!*    ** *YOERRTRF* - RRTM REFERENCE ATMOSPHERE
12!     -----------------------------------------------------------------
13
14REAL_B , DIMENSION(59) :: PREF
15REAL_B , DIMENSION(59) :: PREFLOG
16REAL_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!     -----------------------------------------------------------------
29END MODULE YOERRTRF
Note: See TracBrowser for help on using the repository browser.