Philippe 11/07/2024: bugfix: reset CCPLFILE before reading it again

src/MNH/ini_segn.f90

@@ -461,7 +461,8 @@ CALL READ_EXSEG_n(KMI,TZFILE_DES,YCONF,GFLAT,GUSERV,GUSERC,                 &
 !
 IF (CPROGRAM=='SPAWN ' .OR. CPROGRAM=='DIAG  ' .OR. CPROGRAM=='SPEC  '      &
      .OR. CPROGRAM=='REAL  ') THEN
-  CINIFILE_n    = YINIFILE
+  CINIFILE_n  = YINIFILE
+  CCPLFILE(:) = ''
   NMODEL=1
   LSTEADYLS=.TRUE.
 END IF

src/MNH/read_exsegn.f90

@@ -523,6 +523,7 @@ CALL INIT_NAM_FIREn
 !
 WRITE(UNIT=ILUOUT,FMT="(/,'READING THE EXSEG.NAM FILE')")
 CALL POSNAM( TPEXSEGFILE, 'NAM_LUNITN', GFOUND )
+CCPLFILE(:) = ''
 IF (GFOUND) READ(UNIT=ILUSEG,NML=NAM_LUNITn)
 CALL POSNAM( TPEXSEGFILE, 'NAM_CONFN', GFOUND )
 IF (GFOUND) READ(UNIT=ILUSEG,NML=NAM_CONFn)