@@ -661,25 +661,18 @@ Public Class atcFrequencyGridSource
661
661
lRept.AppendLine()
662
662
663
663
If pHigh Then
664
- If lNumZero > 0 Then
665
- lRept.AppendLine( " Adjusted Variance 95-Pct Confidence" )
666
- Else
667
- lRept.AppendLine( " Variance 95-Pct Confidence" )
668
- End If
664
+ lRept.AppendLine( " Variance 95-Pct Confidence" )
669
665
lRept.AppendLine( " Exceedence Recurrence Parameter of Intervals" )
670
666
Else
671
- If lNumZero > 0 Then
672
- lRept.AppendLine( " Non- Adjusted Variance 95-Pct Confidence" )
673
- Else
674
- lRept.AppendLine( " Non- Variance 95-Pct Confidence" )
675
- End If
667
+ lRept.AppendLine( " Non- Variance 95-Pct Confidence" )
676
668
lRept.AppendLine( " exceedance Recurrence Parameter of Intervals" )
677
669
End If
678
- 'If just aligns code
679
- If True Then
670
+ If lNumZero > 0 Then
671
+ lRept.AppendLine( " Probability Interval Value (*) Estimate Lower Upper" )
672
+ Else
680
673
lRept.AppendLine( " Probability Interval Value Estimate Lower Upper" )
681
- lRept.AppendLine( " ----------- ---------- --------- -------- --------- ---------" )
682
674
End If
675
+ lRept.AppendLine( " ----------- ---------- --------- -------- --------- ---------" )
683
676
End If
684
677
685
678
Dim lReverseString As String = ""
@@ -756,9 +749,9 @@ Public Class atcFrequencyGridSource
756
749
757
750
lRept.AppendLine()
758
751
If lNumZero > 0 Then
759
- lRept.AppendLine( " Note -- Conditional Probability Adjustment applied because of zero flow(s), " )
760
- lRept.AppendLine( " Adjusted parameter values (column 3) correspond with non-exceedence " )
761
- lRept.AppendLine( " probabilities (column 1) and recurrence intervals (column 2)." )
752
+ lRept.AppendLine( " (*) Note - Conditional Probability Adjustment (CPA) applied because of zero flow(s). " )
753
+ lRept.AppendLine( " Parameter values (column 3), adjusted using CPA, correspond with" )
754
+ lRept.AppendLine( " non-exceedence probabilities (column 1) and recurrence intervals (column 2)." )
762
755
'Or, could Add Message Here, like another Note entry
763
756
End If
764
757
lRept.AppendLine()
0 commit comments