Index: LMDZ6/branches/Amaury_dev/libf/phylmd/dyn1d/lmdz_old_lmdz1d.F90
===================================================================
--- LMDZ6/branches/Amaury_dev/libf/phylmd/dyn1d/lmdz_old_lmdz1d.F90	(revision 5227)
+++ LMDZ6/branches/Amaury_dev/libf/phylmd/dyn1d/lmdz_old_lmdz1d.F90	(revision 5228)
@@ -24,6 +24,7 @@
             awake_dens, cv_gen, wake_cstar, &
             zgam, zmax0, zmea, zpic, zsig, &
-            zstd, zthe, zval, ale_bl, ale_bl_trig, alp_bl, ql_ancien, qs_ancien, &
-            prlw_ancien, prsw_ancien, prw_ancien, &
+            zstd, zthe, zval, ale_bl, ale_bl_trig, alp_bl, &
+            ql_ancien, qs_ancien, qbs_ancien, cf_ancien, rvc_ancien, &
+            prlw_ancien, prsw_ancien, prbsw_ancien, prw_ancien, &
             u10m, v10m, ale_wake, ale_bl_stat
 
@@ -859,4 +860,12 @@
         prsw_ancien = 0.
         prw_ancien = 0.
+        IF ( ok_bs ) THEN
+          qbs_ancien = 0.
+          prbsw_ancien = 0.
+        END IF
+        IF (ok_ice_supersat) THEN
+        cf_ancien = 0.
+        rvc_ancien = 0.
+        END IF
                 !jyg<
                 !!        pbl_tke(:,:,:)=1.e-8
Index: LMDZ6/branches/Amaury_dev/libf/phylmd/dyn1d/lmdz_scm.F90
===================================================================
--- LMDZ6/branches/Amaury_dev/libf/phylmd/dyn1d/lmdz_scm.F90	(revision 5227)
+++ LMDZ6/branches/Amaury_dev/libf/phylmd/dyn1d/lmdz_scm.F90	(revision 5228)
@@ -17,6 +17,7 @@
             awake_dens, cv_gen, wake_cstar, &
             zgam, zmax0, zmea, zpic, zsig, &
-            zstd, zthe, zval, ale_bl, ale_bl_trig, alp_bl, ql_ancien, qs_ancien, &
-            prlw_ancien, prsw_ancien, prw_ancien, &
+            zstd, zthe, zval, ale_bl, ale_bl_trig, alp_bl, &
+            ql_ancien, qs_ancien, qbs_ancien, cf_ancien, rvc_ancien, &
+            prlw_ancien, prsw_ancien, prbsw_ancien, prw_ancien, &
             u10m, v10m, ale_wake, ale_bl_stat, ratqs_inter_
 
@@ -616,4 +617,12 @@
         prsw_ancien = 0.
         prw_ancien = 0.
+        IF ( ok_bs ) THEN
+           qbs_ancien = 0.
+           prbsw_ancien = 0.
+        END IF
+        IF ( ok_ice_supersat ) THEN
+          cf_ancien = 0.
+          rvc_ancien = 0.
+        END IF
         !jyg<
         ! Etienne: comment those lines since now the TKE is inialized in 1D_read_forc_cases