Update call_caraib.f90

couplage/MAR/call_caraib.f90

@@ -43,10 +43,11 @@
         CASE (0)
             first_day = jdarGE
             day_counter = 1
-            first_iter = 1
+            
 
         ! Write Caraib domain
         CASE (1)
+            first_iter = 1
             write(6,*) "write eco"
             call make_eco
         
@@ -83,7 +84,7 @@
                 call caraib
 
                 !Rename all the files of the first output of CARAIB if its the spin up
-                if (first_iter .eq. 1)  CALL rename_spinup
+                if (first_iter .eq. 0)  CALL rename_spinup
                 !   
     
                 day_counter = day_counter + 1