Index: trunk/LMDZ.MARS/libf/phymars/improvedco2clouds_mod.F90
===================================================================
--- trunk/LMDZ.MARS/libf/phymars/improvedco2clouds_mod.F90	(revision 2390)
+++ trunk/LMDZ.MARS/libf/phymars/improvedco2clouds_mod.F90	(revision 2391)
@@ -491,6 +491,5 @@
 !----------------------------------------------------------------------------------------------------------------------!
       ! we trigger crystal growth
-      write(*,*)'ice_growth', zq(ig, l, igcm_ccnco2_number), zq(ig, l, igcm_co2_ice), satu
-      if (zq(ig,l,igcm_ccnco2_number) * tauscaling(ig) + threshold >= 1.) then
+      if (zq(ig,l,igcm_ccnco2_number) * tauscaling(ig) >= threshold) then
 
         call updaterice_microco2(zq(ig,l,igcm_co2_ice), zq(ig,l,igcm_ccnco2_mass), zq(ig,l,igcm_ccnco2_number), &