Skip to content
Snippets Groups Projects
Commit f54c2ce7 authored by WAUTELET Philippe's avatar WAUTELET Philippe
Browse files

Philippe 28/04/2021: minor bugfix: print NAM_BLANKn for all models

parent 47d284e2
No related branches found
No related tags found
No related merge requests found
!MNH_LIC Copyright 1994-2018 CNRS, Meteo-France and Universite Paul Sabatier
!MNH_LIC Copyright 1994-2021 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.
......@@ -486,6 +486,9 @@ IF (NVERB >= 5) THEN
!
WRITE(UNIT=ILUOUT,FMT="('********** BLOWING SNOW SCHEME ****************')")
WRITE(UNIT=ILUOUT,NML=NAM_BLOWSNOWn)
!
WRITE(UNIT=ILUOUT,FMT="('********** BLANKn *****************************')")
WRITE(UNIT=ILUOUT,NML=NAM_BLANKn)
!
IF (KMI==1) THEN
WRITE(UNIT=ILUOUT,FMT="(/,'PART OF SEGMENT FILE COMMON TO ALL THE MODELS')")
......@@ -563,9 +566,6 @@ IF (NVERB >= 5) THEN
!
WRITE(UNIT=ILUOUT,FMT="('************ LES ******************************')")
WRITE(UNIT=ILUOUT,NML=NAM_LES)
!
WRITE(UNIT=ILUOUT,FMT="('************ BLANK ****************************')")
WRITE(UNIT=ILUOUT,NML=NAM_BLANKn)
!
WRITE(UNIT=ILUOUT,FMT="('************ FORCING **************************')")
WRITE(UNIT=ILUOUT,NML=NAM_FRC)
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment