Index: LMDZ6/trunk/libf/phylmd/thermcell_plume.F90
===================================================================
--- LMDZ6/trunk/libf/phylmd/thermcell_plume.F90	(revision 3073)
+++ LMDZ6/trunk/libf/phylmd/thermcell_plume.F90	(revision 3074)
@@ -113,4 +113,6 @@
 
       LOGICAL, SAVE :: first=.true.
+  !$OMP THREADPRIVATE(first)
+
 
       REAL c2(ngrid,klev)
