source: LMDZ6/branches/LMDZ_ECRad/libf/phylmd/nuage.h @ 5024

Last change on this file since 5024 was 4727, checked in by idelkadi, 13 months ago

Merged trunk changes -r4488:4726 LMDZ_ECRad 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
  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 584 bytes
Line 
1!
2! $Id: nuage.h 4727 2023-10-19 14:02:57Z asima $
3!
4      REAL rad_froid, rad_chau1, rad_chau2
5      REAL tau_cld_cv,coefw_cld_cv
6      REAL tmax_fonte_cv
7      INTEGER iflag_cld_cv, iflag_ratqs
8      LOGICAL ok_icefra_lscp
9
10      common /nuagecom/ rad_froid,rad_chau1, rad_chau2,                 &
11     &                  tau_cld_cv,coefw_cld_cv,                        &
12     &                  tmax_fonte_cv,iflag_ratqs,                      &
13     &                  iflag_cld_cv,                                   &
14     &                  ok_icefra_lscp                                 
15!$OMP THREADPRIVATE(/nuagecom/)
Note: See TracBrowser for help on using the repository browser.