Index: /LMDZ5/trunk/libf/phylmd/rrtm/read_rsun_rrtm.F90
===================================================================
--- /LMDZ5/trunk/libf/phylmd/rrtm/read_rsun_rrtm.F90	(revision 2741)
+++ /LMDZ5/trunk/libf/phylmd/rrtm/read_rsun_rrtm.F90	(revision 2742)
@@ -16,5 +16,5 @@
   USE mod_phys_lmdz_para
 
-  USE YOESW    , ONLY : RSUN
+  USE YOESW, ONLY : RSUN
 
   IMPLICIT NONE
@@ -33,5 +33,6 @@
 !$OMP THREADPRIVATE(TSI)
 
-  INTEGER, SAVE :: day_pre
+  INTEGER, SAVE :: day_pre=1
+!$OMP THREADPRIVATE(day_pre)
 
 !--only one processor reads