source: LMDZ5/trunk/libf/phylmd/rrtm/yomaer15.F90 @ 2005

Last change on this file since 2005 was 1990, checked in by Laurent Fairhead, 11 years ago

Corrections à la version r1989 pour permettre la compilation avec RRTM
Inclusion de la licence CeCILL_V2 pour RRTM

Changes to revision r1989 to enable RRTM code compilation
RRTM part put under CeCILL_V2 licence
  • Property copyright set to
    Name of program: LMDZ
    Creation date: 1984
    Version: LMDZ5
    License: CeCILL version 2
    Holder: Laboratoire de m\'et\'eorologie dynamique, CNRS, UMR 8539
    See the license file in the root directory
File size: 1.1 KB
RevLine 
[1989]1MODULE YOMAER15
2
3USE PARKIND1  ,ONLY : JPIM     ,JPRB
4
5IMPLICIT NONE
6
7SAVE
8
9!     -----------------------------------------------------------------
10!*    ** *YOMAER15* - RADIATIVE CHARACTERISTICS OF THE AEROSOLS
11!*                          FROZEN VERSION (CYCLE 15) OF YOEAER
12!     -----------------------------------------------------------------
13
14!        * E.C.M.W.F. PHYSICS PACKAGE *
15
16!        96-11: Ph. Dandin. Meteo-France
17!     J.-J. MORCRETTE       E.C.M.W.F.      89/07/14
18!        04-06: F. Bouyssel. Initialisation done in suaer15
19!        05-09: A. Alias     Sulfate aerosol (Hu Ron Ming)
20
21!  NAME      TYPE     PURPOSE
22!  ----   :  ----   : -------
23!  TAUA15 :  REAL     S.W. NORMALIZED OPTICAL THICKNESS AT 0.55 MICRON
24!  RPIZA15:  REAL     S.W. SINGLE SCATTERING ALBEDO
25!  RCGA15 :  REAL     S.W. ASSYMETRY FACTOR
26!  RAER15 :  REAL     L.W. ABSORPTION COEFFICIENTS
27!     -----------------------------------------------------------------
28
29REAL(KIND=JPRB) :: TAUA15 (2,6)
30REAL(KIND=JPRB) :: RPIZA15(2,6)
31REAL(KIND=JPRB) :: RCGA15 (2,6)
32REAL(KIND=JPRB) :: RAER15 (5,6)
33
34END MODULE YOMAER15
Note: See TracBrowser for help on using the repository browser.