Index: LMDZ6/trunk/libf/phylmd/cva_driver.f90
===================================================================
--- LMDZ6/trunk/libf/phylmd/cva_driver.f90	(revision 5693)
+++ LMDZ6/trunk/libf/phylmd/cva_driver.f90	(revision 5694)
@@ -5,5 +5,5 @@
   PRIVATE
 
-  PUBLIC cva_driver_pre, cva_driver_post, cva_driver
+  PUBLIC cva_driver
 
 CONTAINS
@@ -562,5 +562,5 @@
   REAL epmax_diag(nloc) ! epmax_cape
 
-  CHARACTER (LEN=20) :: modname = 'cva_driver'
+  CHARACTER (LEN=20), PARAMETER :: modname = 'cva_driver'
   CHARACTER (LEN=80) :: abort_message
 
@@ -568,7 +568,5 @@
   REAL, PARAMETER    :: Cape_noconv = -1.
 
-  INTEGER,SAVE                                       :: igout=1
-!$OMP THREADPRIVATE(igout)
-
+  INTEGER, PARAMETER                                       :: igout=1
 
 ! print *, 't1, t1_wake ',(k,t1(1,k),t1_wake(1,k),k=1,nd)