source: LMDZ5/branches/testing/libf/phylmd/rrtm/yoeaerop.F90 @ 1999

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

Merged trunk changes r1920:1997 into testing branch

  • 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.2 KB
Line 
1MODULE YOEAEROP
2
3USE PARKIND1  ,ONLY : JPRB
4
5IMPLICIT NONE
6
7SAVE
8
9!     ------------------------------------------------------------------
10!*    ** *YOEAEROP* - OPTICAL PROPERTIES FOR PROGNOSTIC AEROSOLS
11!     ------------------------------------------------------------------
12
13REAL(KIND=JPRB) :: ALF_BC(16)     , ASY_BC(16)     , OMG_BC(16)
14REAL(KIND=JPRB) :: ALF_DD(3,16)   , ASY_DD(3,16)   , OMG_DD(3,16)
15REAL(KIND=JPRB) :: ALF_FA(16)     , ASY_FA(16)     , OMG_FA(16)
16REAL(KIND=JPRB) :: ALF_OM(12,16)  , ASY_OM(12,16)  , OMG_OM(12,16)
17REAL(KIND=JPRB) :: ALF_SS(12,16,3), ASY_SS(12,16,3), OMG_SS(12,16,3)
18REAL(KIND=JPRB) :: ALF_SU(12,16)  , ASY_SU(12,16)  , OMG_SU(12,16)
19
20!     ------------------------------------------------------------------
21! 3 refers to 3 bins, 16 to 16 SW channel radiances, 12 to 12 reference RH
22! BC is for black carbon
23! DD is for desert dust
24! FA is fort flying ash
25! OM is for organic matter
26! SS is for sea-salt
27! SU is for sulfate
28
29! ALF is alpha , the mass extinction coefficient   in m2/g
30! ASY is g     , the assymetry factor                ND
31! OMG is pizero, the single scattering albedo        ND
32!     ------------------------------------------------------------------
33END MODULE YOEAEROP
34
Note: See TracBrowser for help on using the repository browser.