From b442352abcc6fa68f04653f6849bf75a986b08a6 Mon Sep 17 00:00:00 2001
From: Philippe WAUTELET <philippe.wautelet@aero.obs-mip.fr>
Date: Wed, 20 Jan 2021 10:10:25 +0100
Subject: [PATCH] Philippe 20/01/2021: bugfix: condition was wrong if
 HLES_AVG='H'. Budgets were not written.

(cherry picked from commit cb7345d0e6c373de6b9310858acc39266c4717d4)
---
 src/MNH/write_lesn.f90 | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/src/MNH/write_lesn.f90 b/src/MNH/write_lesn.f90
index e4adb2045..a583470a4 100644
--- a/src/MNH/write_lesn.f90
+++ b/src/MNH/write_lesn.f90
@@ -126,6 +126,12 @@ INTEGER                                 :: IMI ! Current model inde
 !
 IF (.NOT. LLES) RETURN
 !
+IF (HLES_AVG=='A'                                                       &
+     .AND. (XLES_TEMP_MEAN_START==XUNDEF .OR. XLES_TEMP_MEAN_END==XUNDEF)) RETURN
+IF (HLES_AVG=='E' .AND. CLES_NORM_TYPE=='NONE'                          ) RETURN
+IF ( HLES_AVG == 'H' .AND. ( CLES_NORM_TYPE == 'NONE'                        &
+     .OR. XLES_TEMP_MEAN_START == XUNDEF .OR. XLES_TEMP_MEAN_END == XUNDEF ) ) RETURN
+!
 !*      1.   Initializations
 !            ---------------
 !
-- 
GitLab