Index: LMDZ6/trunk/libf/phylmd/lmdz_thermcell_qsat.f90
===================================================================
--- LMDZ6/trunk/libf/phylmd/lmdz_thermcell_qsat.f90	(revision 5513)
+++ LMDZ6/trunk/libf/phylmd/lmdz_thermcell_qsat.f90	(revision 5514)
@@ -61,5 +61,5 @@
                qsatbef=qsatbef*zcor
                qlbef=max(0.,zqta(ig,l)-qsatbef)
-               DT(ig) = 0.5*RLvCp*qlbef
+               DT(ig,l) = 0.5*RLvCp*qlbef
                zqsat(ig,l)=qsatbef
      endif