From 8a3b551f853ed6860b3ca0eda43f902dc2a1fc5e Mon Sep 17 00:00:00 2001
From: Quentin Rodier <quentin.rodier@meteo.fr>
Date: Mon, 11 Oct 2021 17:43:21 +0200
Subject: [PATCH] Quentin 11/10/2021: bugfix, new IMPDRY and IMPWET variables
are allocated inside SURFEX
---
src/MNH/ground_paramn.f90 | 6 ------
1 file changed, 6 deletions(-)
diff --git a/src/MNH/ground_paramn.f90 b/src/MNH/ground_paramn.f90
index bc7c96a34..8b0251e83 100644
--- a/src/MNH/ground_paramn.f90
+++ b/src/MNH/ground_paramn.f90
@@ -553,10 +553,6 @@ ELSE
YSV_SURF(:) = CSV(:)
ENDIF
!
-! 1.15 Wet/dry impurity type deposition coefficient (SURFEX offline)
-!
-ZP_ZIMPWET = 0.
-ZP_ZIMPDRY = 0.
!
!-------------------------------------------------------------------------------
!
@@ -1000,8 +996,6 @@ DEALLOCATE(ZP_TA )
DEALLOCATE(ZP_RHOA )
DEALLOCATE(ZP_SV )
DEALLOCATE(ZP_CO2 )
-DEALLOCATE(ZP_ZIMPDRY )
-DEALLOCATE(ZP_ZIMPWET )
DEALLOCATE(ZP_RAIN )
DEALLOCATE(ZP_SNOW )
DEALLOCATE(ZP_LW )
--
GitLab