Index: LMDZ6/trunk/libf/phylmd/iophy.F90
===================================================================
--- LMDZ6/trunk/libf/phylmd/iophy.F90	(revision 5578)
+++ LMDZ6/trunk/libf/phylmd/iophy.F90	(revision 5582)
@@ -12,4 +12,6 @@
   INTEGER, ALLOCATABLE, DIMENSION(:), SAVE :: nptabij
   INTEGER, SAVE :: itau_iophy
+  !! WARNING, only itau_iophy needs to be put in a THREADPRIVATE statement, 
+  !!          io_lat,io_lon,phys_domain_id,npstn,nptabij are shared between OMP tasks
   LOGICAL :: check_dim = .false.
 !$OMP THREADPRIVATE(itau_iophy)
@@ -971,4 +973,5 @@
   REAL, ALLOCATABLE, DIMENSION(:) :: fieldok
   logical, save :: is_active = .true.
+  !! WARNING, is_active is shared between OMP tasks and should not be put in a THREADPRIVATE statement
 
   IF (check_dim .AND. is_master) WRITE(lunout,*)'histwrite2d_phy for ',trim(var%name)
Index: LMDZ6/trunk/libf/phylmd/oasis.F90
===================================================================
--- LMDZ6/trunk/libf/phylmd/oasis.F90	(revision 5578)
+++ LMDZ6/trunk/libf/phylmd/oasis.F90	(revision 5582)
@@ -137,8 +137,7 @@
     CHARACTER (len = 20)               :: modname = 'inicma'
     CHARACTER (len = 80)               :: abort_message 
+    !! WARNING: cpl_current_omp should NOT be put in a THREADPRIVATE statement, it is shared between tasks
     LOGICAL, SAVE                      :: cpl_current_omp
     INTEGER, DIMENSION(klon_mpi)       :: ind_cell_glo_mpi
-
-    !$OMP THREADPRIVATE(cpl_current_omp)