source: LMDZ6/trunk/libf/phylmdiso/nuage.h @ 3930

Last change on this file since 3930 was 3927, checked in by Laurent Fairhead, 3 years ago

Initial import of the physics wih isotopes from Camille Risi
CR

File size: 792 bytes
RevLine 
[3927]1!
2! $Id: nuage.h 2945 2017-07-12 14:20:24Z jbmadeleine $
3!
4      REAL rad_froid, rad_chau1, rad_chau2, t_glace_max, t_glace_min
5      REAL exposant_glace
6      REAL rei_min,rei_max
7      REAL tau_cld_cv,coefw_cld_cv
8
9      REAL tmax_fonte_cv
10
11      INTEGER iflag_t_glace, iflag_cloudth_vert, iflag_cld_cv
12      INTEGER iflag_rain_incloud_vol
13
14      common /nuagecom/ rad_froid,rad_chau1, rad_chau2,t_glace_max,     &
15     &                  t_glace_min,exposant_glace,rei_min,rei_max,     &
16     &                  tau_cld_cv,coefw_cld_cv,                        &
17     &                  tmax_fonte_cv,                                  &
18     &                  iflag_t_glace,iflag_cloudth_vert,iflag_cld_cv,  &
19     &                  iflag_rain_incloud_vol
20!$OMP THREADPRIVATE(/nuagecom/)
Note: See TracBrowser for help on using the repository browser.