Index: LMDZ6/trunk/libf/phylmd/lmdz_thermcell_plume_6A.F90
===================================================================
--- LMDZ6/trunk/libf/phylmd/lmdz_thermcell_plume_6A.F90	(revision 5026)
+++ LMDZ6/trunk/libf/phylmd/lmdz_thermcell_plume_6A.F90	(revision 5029)
@@ -63,5 +63,5 @@
       REAL,dimension(ngrid,nlay) :: zeps
 
-      REAL, dimension(ngrid) ::    wmaxa(ngrid)
+      REAL, dimension(ngrid) ::    wmaxa
 
       INTEGER ig,l,k,lt,it,lm