problem at the end of the month / year for the make clim file ^^

couplage/MAR/make_clim_files.f90

@@ -73,14 +73,18 @@
 
       ! +--1.2.1 Output File Label
       ! +  -----------------------
-
-      fnamNC_ice = 'ICE.' &
+      if (first_iter .eq. 1) then
+        fnamNC_ice = 'ICE.' &
                    //labnum(n1000)//labnum(n100) &
                    //labnum(n10)//labnum(n1) &
                    //labnum(m10)//labnum(m1) &
                    //labnum(jd10)//labnum(jd1) &
                    //'.'//explIO//'.nc'
-
+        netcdf_name = fnamNC_ice
+      else 
+            fnamNC_ice = netcdf_name
+      endif
+      
       call CF_READ2D(fnamNC_ice,varname_mar,day_counter,mx,my,1,var)
 
       inquire(file=filename, exist=iostat)

couplage/MAR/mar_ge_mod.f90

@@ -102,6 +102,8 @@ module mar_ge
     real, save :: tlssGE
     ! tl__GE : Current  Local Time / (iSND,jSND) (hour)
     real, save :: tl__GE
+    ! netcdf_name : name of the netcdf to read for make clim
+    character(len=100),save :: netcdf_name
 
 contains