From 8d3779808ce035076964717501113fb7c0c7249c Mon Sep 17 00:00:00 2001
From: Philippe WAUTELET <philippe.wautelet@aero.obs-mip.fr>
Date: Mon, 28 Jun 2021 11:02:04 +0200
Subject: [PATCH] Philippe 28/06/2021: add missing write of NAM_STATIONn
---
src/MNH/read_desfmn.f90 | 3 +++
1 file changed, 3 insertions(+)
diff --git a/src/MNH/read_desfmn.f90 b/src/MNH/read_desfmn.f90
index ca4979de3..2f781f8e7 100644
--- a/src/MNH/read_desfmn.f90
+++ b/src/MNH/read_desfmn.f90
@@ -732,6 +732,9 @@ IF (NVERB >= 10) THEN
!
WRITE(UNIT=ILUOUT,FMT="('********** BLANKn ******************')")
WRITE(UNIT=ILUOUT,NML=NAM_BLANKn)
+!
+ WRITE(UNIT=ILUOUT,FMT="('********** STATIONn ******************')")
+ WRITE(UNIT=ILUOUT,NML=NAM_STATIONn)
!
IF (KMI==1) THEN
WRITE(UNIT=ILUOUT,FMT="(/,'PART OF INITIAL FILE COMMON TO ALL THE MODELS')")
--
GitLab