Philippe 06/10/2017: PREP_NEST_PGD: moved INI_FIELD_LIST from OPEN_NESTPGD_FILES to PREP_NEST_PGD

src/MNH/open_nestpgd_files.f90

@@ -324,8 +324,6 @@ END DO
 !*       7.    OPENING OF OUTPUT LISTING FILES FOR ALL MODELS
 !              ----------------------------------------------
 !
-CALL INI_FIELD_LIST()
-!
 DO JPGD=1,NMODEL
   CALL GOTO_MODEL(JPGD)
   WRITE(YLUOUT,'("OUTPUT_LISTING",I0)') JPGD

src/MNH/prep_nest_pgd.f90

@@ -203,6 +203,8 @@ CALL READ_ALL_NAMELISTS(YSURF_CUR,'MESONH','PRE',.FALSE.)
 !*       3.    READING OF THE GRIDS
 !              --------------------
 !
+CALL INI_FIELD_LIST()
+!
 CALL SET_DAD0_ll()
 DO JPGD=1,NMODEL
   ! read and set dimensions and ratios of model JPGD