From f3724f3e0720ba2864af78821a3caee980931990 Mon Sep 17 00:00:00 2001
From: Philippe WAUTELET <philippe.wautelet@aero.obs-mip.fr>
Date: Wed, 19 Aug 2020 15:25:43 +0200
Subject: [PATCH] Philippe 19/08/2020: budgets: bugfix: remove wrong line
---
src/MNH/les_budget.f90 | 1 -
1 file changed, 1 deletion(-)
diff --git a/src/MNH/les_budget.f90 b/src/MNH/les_budget.f90
index a5114416f..356736f0f 100644
--- a/src/MNH/les_budget.f90
+++ b/src/MNH/les_budget.f90
@@ -383,7 +383,6 @@ SELECT CASE (KBUDN)
else
XCURRENT_RSVS(:,:,:,KBUDN-(NBUDGET_SV1-1)) = PVARS
end if
- XV_ANOM = ZANOM
XSV_ANOM(:,:,:,KBUDN-(NBUDGET_SV1-1)) = ZANOM
END SELECT
--
GitLab