Philippe 29/01/2016: added default value for YLUOUT filename (minor bug seen by valgrind)

src/MNH/close_file_mnh.f90

@@ -90,7 +90,7 @@ SELECT CASE(CPROGRAM)
   CASE('MESONH','SPAWN ')
     CALL GET_MODEL_NUMBER_ll  (IMI)
     WRITE(YLUOUT,FMT='(A14,I1,A1)') 'OUTPUT_LISTING',IMI,' '
-  CASE DEFAUT
+  CASE DEFAULT
     YLUOUT = ''
 END SELECT
 !

src/MNH/mnhget_desfmn.f90

@@ -97,6 +97,8 @@ SELECT CASE(CPROGRAM)
   CASE('MESONH','SPAWN ')
     IMI = GET_CURRENT_MODEL_INDEX() 
     WRITE(YLUOUT,FMT='(A14,I1,A1)') 'OUTPUT_LISTING',IMI,' '
+  CASE DEFAULT
+    YLUOUT = ''
 END SELECT
 !
 CALL FMLOOK_ll(YLUOUT,YLUOUT,ILUOUT,IRESP)