Index: LMDZ6/trunk/libf/phylmd/lmdz_cloud_optics_prop.f90
===================================================================
--- LMDZ6/trunk/libf/phylmd/lmdz_cloud_optics_prop.f90	(revision 5645)
+++ LMDZ6/trunk/libf/phylmd/lmdz_cloud_optics_prop.f90	(revision 5646)
@@ -25,5 +25,5 @@
   USE lmdz_cloud_optics_prop_ini , ONLY : k_ice0, df
   USE lmdz_cloud_optics_prop_ini , ONLY : rg, rd, rpi
-  USE lmdz_cloud_optics_prop_ini , ONLY : rad_chau1, rad_chau2, rad_froid, iflag_rei
+  USE lmdz_cloud_optics_prop_ini , ONLY : rad_chau1, rad_chau2, iflag_rei
   USE lmdz_cloud_optics_prop_ini , ONLY : ok_icefra_lscp, rei_max, rei_min
   USE lmdz_cloud_optics_prop_ini , ONLY : rei_coef, rei_min_temp
Index: LMDZ6/trunk/libf/phylmd/lmdz_cloud_optics_prop_ini.f90
===================================================================
--- LMDZ6/trunk/libf/phylmd/lmdz_cloud_optics_prop_ini.f90	(revision 5645)
+++ LMDZ6/trunk/libf/phylmd/lmdz_cloud_optics_prop_ini.f90	(revision 5646)
@@ -19,5 +19,5 @@
   REAL, PROTECTED :: cdnc_min_m3=-1.
   REAL, PROTECTED :: rpi, rg, rd
-  REAL, PROTECTED :: rad_chau1, rad_chau2, rad_froid
+  REAL, PROTECTED :: rad_chau1, rad_chau2
   REAL, PROTECTED :: rei_max, rei_min
   REAL, PROTECTED :: rei_coef, rei_min_temp
@@ -38,5 +38,5 @@
 !$OMP THREADPRIVATE(bl95_b0, bl95_b1, cdnc_max, cdnc_max_m3)
 !$OMP THREADPRIVATE(cdnc_min, cdnc_min_m3, rpi, rg, rd)
-!$OMP THREADPRIVATE(rad_chau1, rad_chau2, rad_froid, rei_max, rei_min)
+!$OMP THREADPRIVATE(rad_chau1, rad_chau2, rei_max, rei_min)
 !$OMP THREADPRIVATE(rei_coef, rei_min_temp)
 !$OMP THREADPRIVATE(zepsec) 
@@ -92,5 +92,4 @@
     CALL getin_p('rad_chau1',rad_chau1)
     CALL getin_p('rad_chau2',rad_chau2)
-    CALL getin_p('rad_froid ',rad_froid)
     CALL getin_p('ok_icefra_lscp', ok_icefra_lscp)
     iflag_rei = 0