source: LMDZ6/branches/LMDZ-INCA-Dyn/libf/phylmd/rrtm/yomarphy.F90 @ 5428

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

Modifications pour OpenMP


OpenMP modifications

  • 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.6 KB
Line 
1MODULE YOMARPHY
2
3IMPLICIT NONE
4
5SAVE
6
7!*
8!    -----------------------------------------------------------------
9
10!    VARIABLES DE CONTROLE DE LA PHYSIQUE AROME :
11!    CONTROL VARIABLES FOR THE AROME PHYSICS:
12
13!    LMPA    : CLE GENERALE POUR LA PHYSIQUE AROME
14!            : GLOBAL SWITCH FOR AROME PHYSICS
15!    LMICRO  : CLE D'APPEL DU SCHEMA MICROPHYSIQUE ICE3
16!              SWITCH FOR THE "ICE3" MICROPHYSICS SCHEME
17!    LTURB   : CLE D'APPEL DU SCHEMA DE TURBULENCE
18!              SWITCH FOR THE TURBULENCE SCHEME
19!    LMSE    : CLE D'APPEL DU SHEMA DE SURFACE EXTERNALISE
20!              SWITCH FOR THE EXTERNALIZED SURFACE SCHEME
21!    LKFBCONV: Control key to KFB convection scheme (deep and/or shallow)
22!    LKFBD   : Control key to KFB deep convection
23!    LKFBS   : Control key to KFB shallow convection
24!    LUSECHEM: Contol key for calling the Gas Chemistry scheme
25!    LORILAM : Contol key for calling the Aerosol Chemistry scheme
26!    LRDUST   : Contol key for calling the desertic aerosols
27!    LBUFLUX  : If TRUE fluxes are calculated in AROEND_BUDGET,
28!               if FALSE, tendencies remain
29!   CCOUPLING : Type of SURFEX coupling. E - explicit, I - implicit
30
31LOGICAL :: LMPA
32LOGICAL :: LMICRO
33LOGICAL :: LTURB
34LOGICAL :: LMSE
35LOGICAL :: LKFBCONV
36LOGICAL :: LKFBD,LKFBS
37LOGICAL :: LUSECHEM
38LOGICAL :: LORILAM
39LOGICAL :: LRDUST
40LOGICAL :: LBUFLUX
41CHARACTER(LEN=1) :: CCOUPLING
42!    -------------------------------------------------------------------
43!$OMP THREADPRIVATE(ccoupling,lbuflux,lkfbconv,lkfbd,lkfbs,lmicro,lmpa,lmse,lorilam,lrdust,lturb,lusechem)
44END MODULE YOMARPHY
45
Note: See TracBrowser for help on using the repository browser.