From dbbf74e7bf42423b639887ce15675aa9bc9ac7bb Mon Sep 17 00:00:00 2001
From: Larry <frank.lunkeit@uni-hamburg.de>
Date: Wed, 16 May 2018 16:20:54 +0200
Subject: [PATCH] Larry 15.05.18 fix in calmod.f90 for nperpetual
---
plasim/src/calmod.f90 | 1 +
1 file changed, 1 insertion(+)
diff --git a/plasim/src/calmod.f90 b/plasim/src/calmod.f90
index 0d143ea..26016a2 100644
--- a/plasim/src/calmod.f90
+++ b/plasim/src/calmod.f90
@@ -72,6 +72,7 @@
else
kmon = (kyday-1) / n_days_per_month
kday = kyday - n_days_per_month * kmon
+ kmon = kmon+1
endif
return
end
--
GitLab