From e8ae30848b215438dc68f96fa713b2214768b5b1 Mon Sep 17 00:00:00 2001
From: Petra Lasch <lasch@pik-potsdam.de>
Date: Wed, 30 Jan 2019 11:45:06 +0100
Subject: [PATCH] Update wpm_wood_proc.f
---
source_code/version2.2_windows/wpm_wood_proc.f | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/source_code/version2.2_windows/wpm_wood_proc.f b/source_code/version2.2_windows/wpm_wood_proc.f
index 3aa07d8..72d1487 100755
--- a/source_code/version2.2_windows/wpm_wood_proc.f
+++ b/source_code/version2.2_windows/wpm_wood_proc.f
@@ -154,7 +154,7 @@ integer act_spec, act_year, set_year
! calculate emission from harvesting process
emission_har (management_years(i)) = summe * sub_par(1)
- write (9999,*) emission_har(management_years(i)), management_years(i)
+! write (9999,*) emission_har(management_years(i)), management_years(i)
end do
end subroutine calculate_product_lines
--
GitLab