Index: trunk/LMDZ.VENUS/libf/phyvenus/datafile_mod.F90
===================================================================
--- trunk/LMDZ.VENUS/libf/phyvenus/datafile_mod.F90	(revision 3764)
+++ trunk/LMDZ.VENUS/libf/phyvenus/datafile_mod.F90	(revision 3775)
@@ -19,6 +19,5 @@
       ! corrkdir points to the directory that stores correlated-k data
       ! the corrkdir link must be in datagcm/corrk_data/
-      character(len=100),parameter :: corrkdir="corrkdir"
-!$OMP THREADPRIVATE(corrkdir)
+      character(len=8),parameter :: corrkdir="corrkdir"
 
       ! also for corrk data: defined in sw_venus_corrk.F90
Index: trunk/LMDZ.VENUS/libf/phyvenus/radcommon_h.F90
===================================================================
--- trunk/LMDZ.VENUS/libf/phyvenus/radcommon_h.F90	(revision 3764)
+++ trunk/LMDZ.VENUS/libf/phyvenus/radcommon_h.F90	(revision 3775)
@@ -53,5 +53,5 @@
       !! AS: introduced to avoid doing same computations again for continuum
       INTEGER, DIMENSION(:,:,:), ALLOCATABLE :: indv
-!$OMP THREADPRIVATE(indi,indv)
+!$OMP THREADPRIVATE(indv)
 
       !!! ALLOCATABLE STUFF SO THAT DIMENSIONS ARE READ in *.dat FILES -- AS 12/2011  
@@ -84,5 +84,5 @@
 
       DOUBLE PRECISION :: radiustab(naerkind,2,nsizemax)
-!$OMP THREADPRIVATE(lamrefir,lamrefvis,radiustab) !nsize read by suaer_corrk
+!$OMP THREADPRIVATE(lamrefvis,radiustab) !nsize read by suaer_corrk
 
 ! Extinction coefficient at reference wavelengths;