From b03b7dc95611fd3427f5b0fd2c365a391fd51b24 Mon Sep 17 00:00:00 2001 From: Anurag Mishra Date: Fri, 14 Apr 2017 11:01:43 -0700 Subject: [PATCH] Fixed the sum of surface runoff and PET By changing the calculation method for calculating time series parameters, I inadvertently introduced a bug and the value of surface runoff and potential ET were not being written in the Expert Statistics file. Fixed that issue. --- atcHspfSupport/atcHspfExpertSystemEXPPlus.vb | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/atcHspfSupport/atcHspfExpertSystemEXPPlus.vb b/atcHspfSupport/atcHspfExpertSystemEXPPlus.vb index fbe781398..7eee67115 100644 --- a/atcHspfSupport/atcHspfExpertSystemEXPPlus.vb +++ b/atcHspfSupport/atcHspfExpertSystemEXPPlus.vb @@ -567,7 +567,7 @@ Public Class atcExpertSystem Dim lValues() As Double = lDailyTSer.Values 'total volume always needed 'RWZSetArgs(lDailyTSer) 'Becky's addition Dec 9: this uses atcTimeseriesStatistics to calculate all the sums, bins needed below - pStats(1, lStatGroup, lSiteIndex) = lValueCollection.ItemByKey("Sum") 'Becky commented this out and used .GetValue instead + pStats(1, lStatGroup, lSiteIndex) = lDailyTSer.Attributes.GetDefinedValue("Sum").Value 'Becky commented this out and used .GetValue instead 'others? If (lStatGroup = 1 Or lStatGroup = 2) Then 'full range of pStats desired pStats(2, lStatGroup, lSiteIndex) = lValueCollection.ItemByKey("%Sum50") 'lDailyTSer.Attributes.GetValue("%Sum50") '50% low