! ! $Id: nuage.h 1525 2011-05-25 10:55:27Z asima $ ! REAL rad_froid, rad_chau1, rad_chau2, t_glace_max, t_glace_min REAL rei_min,rei_max common /nuagecom/ rad_froid,rad_chau1, rad_chau2,t_glace_max, & & t_glace_min,rei_min,rei_max !$OMP THREADPRIVATE(/nuagecom/)