Index: trunk/LMDZ.MARS/libf/phymars/newcondens.F
===================================================================
--- trunk/LMDZ.MARS/libf/phymars/newcondens.F	(revision 327)
+++ trunk/LMDZ.MARS/libf/phymars/newcondens.F	(revision 328)
@@ -279,5 +279,5 @@
       ENDDO
 
-      ztcond(:,nlay+1)=ztcond(:,nlay)
+      ztcond(:,nlayer+1)=ztcond(:,nlayer)
  
 c      Condensation/sublimation in the atmosphere