Quentin 04/10/2021: bugfix of the previous commit. The diagnostic surfex...

Quentin 04/10/2021: bugfix of the previous commit. The diagnostic surfex variables were not written at any first output file for every segment (instead of not written at time = 0s i.e. KTCOUNT=1 )

src/MNH/modeln.f90

@@ -972,7 +972,7 @@ IF ( nfile_backup_current < NBAK_NUMB ) THEN
       TFILE_SURFEX => TZBAKFILE
       CALL GOTO_SURFEX(IMI)
       CALL WRITE_SURF_ATM_n(YSURF_CUR,'MESONH','ALL',.FALSE.)
-      IF ( nfile_backup_current -1 > 0) THEN
+      IF ( KTCOUNT > 1) THEN
         CALL DIAG_SURF_ATM_n(YSURF_CUR,'MESONH')
         CALL WRITE_DIAG_SURF_ATM_n(YSURF_CUR,'MESONH','ALL')
       END IF