From 1d4ccc94c9d9e9970feabade237c93f98f8c9d62 Mon Sep 17 00:00:00 2001
From: Philippe WAUTELET <philippe.wautelet@aero.obs-mip.fr>
Date: Fri, 18 Oct 2019 10:27:34 +0200
Subject: [PATCH] Philippe 18/10/2019: correction of units (to be conform to
 MesoNH standard)

---
 src/MNH/write_les_sv_budgetn.f90 | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/MNH/write_les_sv_budgetn.f90 b/src/MNH/write_les_sv_budgetn.f90
index 10df1eebe..7acd1ed97 100644
--- a/src/MNH/write_les_sv_budgetn.f90
+++ b/src/MNH/write_les_sv_budgetn.f90
@@ -382,7 +382,7 @@ DO JSV=1,NSV
 END DO
 
 YTITLE = "Sv variance budget  "
-CALL LES_DIACHRO_SV_MASKS(TPDIAFILE,YGROUP,YSUBTITLE(:ILES),YTITLE//YSUBTITLE(:ILES),"kg2/kg2/s",ZSV_BUDGET,HLES_AVG)
+CALL LES_DIACHRO_SV_MASKS(TPDIAFILE,YGROUP,YSUBTITLE(:ILES),YTITLE//YSUBTITLE(:ILES),"kg2 kg-2 s-1",ZSV_BUDGET,HLES_AVG)
 !
 DEALLOCATE(ZSV_BUDGET)
 !-------------------------------------------------------------------------------
@@ -752,7 +752,7 @@ DO JSV=1,NSV
 END DO
 
 YTITLE = "Sv flux budget      "
-CALL LES_DIACHRO_SV_MASKS(TPDIAFILE,YGROUP,YSUBTITLE(:ILES),YTITLE//YSUBTITLE(:ILES),"mkg/kg/s2",ZSV_BUDGET,HLES_AVG)
+CALL LES_DIACHRO_SV_MASKS(TPDIAFILE,YGROUP,YSUBTITLE(:ILES),YTITLE//YSUBTITLE(:ILES),"m kg kg-1 s-2",ZSV_BUDGET,HLES_AVG)
 !
 DEALLOCATE(ZSV_BUDGET)
 !-------------------------------------------------------------------------------
-- 
GitLab