Philippe 19/04/2018: IO: set CDIRNAME=NULL() in initialization (to remove problem with PGI and XLF)

src/LIB/SURCOUCHE/src/modd_io.f90

@@ -126,6 +126,6 @@ TYPE(TFILEDATA),POINTER,SAVE :: TFILE_SURFEX  => NULL() !Pointer used to find th
 
 TYPE(TFILEDATA),POINTER,SAVE :: TFILE_OUTPUTLISTING  => NULL() !Pointer used to point to the file used when writing to OUTPUT_LISTINGn file
 
-TYPE(TFILEDATA),TARGET, SAVE :: TFILE_DUMMY = TFILEDATA(CNAME="dummy",TFILES_IOZ=NULL()) !Non existing file which can be used as a dummy target
+TYPE(TFILEDATA),TARGET, SAVE :: TFILE_DUMMY = TFILEDATA(CNAME="dummy",CDIRNAME=NULL(),TFILES_IOZ=NULL()) !Non existing file which can be used as a dummy target
 
 END MODULE MODD_IO_ll