source: LMDZ5/branches/IPSLCM5A2.1_ISO/libf/phyiso/rrtm/yoeovlp.F90 @ 5308

Last change on this file since 5308 was 3331, checked in by acozic, 6 years ago

Add modification for isotopes

  • Property svn:executable set to *
File size: 631 bytes
RevLine 
[3331]1MODULE YOEOVLP
2
3USE PARKIND1  ,ONLY : JPIM     ,JPRB
4
5IMPLICIT NONE
6
7SAVE
8
9!     ------------------------------------------------------------------
10!*     *YOEOVLP* VERTICAL DISTRIBUTION OF CLOUD OVERLAP PARAMETER
11!     ------------------------------------------------------------------
12
13REAL(KIND=JPRB),ALLOCATABLE:: RA1OVLP(:)
14
15!     J.-J. MORCRETTE    E.C.M.W.F.     01/02/16
16
17!      NAME     TYPE      PURPOSE
18!      ----     ----      -------
19
20!     *RA1OVLP* REAL      Alpha1 (Hogan, Illingworth, 2001)
21
22!     ------------------------------------------------------------------
23!$OMP THREADPRIVATE(ra1ovlp)
24END MODULE YOEOVLP
Note: See TracBrowser for help on using the repository browser.