! ! $Id: nuage.h 2056 2014-06-11 13:46:46Z jbmadeleine $ ! REAL rad_froid, rad_chau1, rad_chau2, t_glace_max, t_glace_min REAL exposant_glace REAL rei_min,rei_max INTEGER iflag_t_glace common /nuagecom/ rad_froid,rad_chau1, rad_chau2,t_glace_max, & & t_glace_min,exposant_glace,rei_min,rei_max, & & iflag_t_glace !$OMP THREADPRIVATE(/nuagecom/)