-
This is a numbered list.
-
I'm going to include a fenced code block as part of this bullet:
Code More Code
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Function Muskingum(timeSeries As Range, _ | |
K As Double, X As Double, _ | |
Optional Reaches As Integer = 1) As Variant | |
'Muskingum routing in Excel | |
'Returns a column array the same length as timeSeries (use array formula or spill) | |
'K (travel time) is in same units as the time step of the input timeSeries | |
'X must be between 0 and 0.5 | |
'Reaches will be automatically adjusted to avoid negative coefficients if K is < 1 / (2*(1-X)) or K > 1/2X | |
Dim Coeffs(1 To 5) As Double |