Philippe 05/04/2023: POSNAM: modernisation + improvements

src/MNH/read_exspa.f90

-!MNH_LIC Copyright 1996-2019 CNRS, Meteo-France and Universite Paul Sabatier
+!MNH_LIC Copyright 1996-2023 CNRS, Meteo-France and Universite Paul Sabatier
 !MNH_LIC This is part of the Meso-NH software governed by the CeCILL-C licence
 !MNH_LIC version 1. See LICENSE, CeCILL-C_V1-en.txt and CeCILL-C_V1-fr.txt
 !MNH_LIC for details. version 1.
@@ -225,18 +225,18 @@ IXOR=NUNDEF
 IYOR=NUNDEF
 GBAL_ONLY=.FALSE.
 !
-CALL POSNAM(ILUSPA,'NAM_GRID2_SPA',GFOUND,ILUOUT)
+CALL POSNAM( TZNMLFILE, 'NAM_GRID2_SPA', GFOUND )
 IF (GFOUND) READ(ILUSPA,NAM_GRID2_SPA)
 !
 CINIFILE    = LUNIT_MODEL(1)%CINIFILE    !To respect default values
 CINIFILEPGD = LUNIT_MODEL(1)%CINIFILEPGD !To respect default values
 !
-CALL POSNAM(ILUSPA,'NAM_LUNIT2_SPA',GFOUND,ILUOUT)
+CALL POSNAM( TZNMLFILE, 'NAM_LUNIT2_SPA', GFOUND )
 IF (GFOUND) READ(ILUSPA,NAM_LUNIT2_SPA)
 LUNIT_MODEL(2)%CINIFILE    = CINIFILE
 LUNIT_MODEL(2)%CINIFILEPGD = CINIFILEPGD
 !
-CALL POSNAM(ILUSPA,'NAM_CONFIO',GFOUND,ILUOUT)
+CALL POSNAM( TZNMLFILE, 'NAM_CONFIO', GFOUND )
 IF (GFOUND) READ(ILUSPA,NAM_CONFIO)
 !
 CALL IO_Config_set()