CURVENUMBER (30 to 100) CN 50 Instruction
INITIALABSTRACTION(mm) Ia 0 1. Place "LibHydro.dll" in C:\temp\
INITIALCUMULATIVEPRECIP(mm) P0 0 2. Input the values for yellow boxes
FINALCUMULATIVEPRECIP(mm) Pf 79 3. Push the button "LossSCSCurveNumber"
IMPERVIOUSAREARATIO (0 -1) R 0 4. Push the button "Draw a graph"
NUMBERPRECIP N 14
PRECIP(mm) EXCESS(mm)
0 0
2 0.015625
4 0.122836538
5 0.318142235
8 0.865740549
LossSCSCurveNumber
12 2.049585502
10 2.32637526
8 2.225787324
Draw a graph
8 2.522852928
8 2.797568769
8 3.052121979
5 2.028665119
1 0.416440537
0 0
LibHydro.dll" in C:\temp\
e values for yellow boxes
he button "LossSCSCurveNumber"
he button "Draw a graph"
3.4 LOSSSCSCURVENUMBER SCS Curve number
Purpose:
Computes precipitation excess based on SCS curve number.
Calling Sequence:
Call LOSSSCSCURVENUMBER(CURVENUMBER, INITIALABSTRACTION,
INITIALCUMULATIVEPRECIP, FINALCUMULATIVEPRECIP, IMPERVIOUSAREARATION,
NUMBERPRECIP, PRECIP(1), EXCESS(1), ERRORCODE, ERRORMESSAGE)
Declarations:
DOUBLE PRECISION CURVENUMBER
DOUBLE PRECISION INITIALABSTRACTION
DOUBLE PRECISION INITIALCUMULATIVE PRECIP, FINALCUMULATIVEPRECIP
DOUBLE PRECISION INPERVIOUSAREARATIO
INTEGER NUMBERPRECIP
DOUBLE PRECISION PRECIP(NUMBERPRECIP), EXCESS(NUMBERPRECIP)
INTEGER*4 ERRORCODE
CHARACTER ERRORMESSAGE*60
Augument Description:
CURVENUMBER (Input) SCS Curve Number
INITIALABSTRACTION (Input) Moisture deficit, mm
INITIALCUMULATIVEPRECIP (Input) Accumulated precipitatio occurring before first value in
precip array; mm
FINALCUMULATIVEPRECIP (Output) Accumulated precipitatio occurring through last value in
precip array; mm
IMPERVIOUSAREARATIO (Input) Impervious area as a ratio of the basin area.
NUMBERPRECIP (Input) Number of precipitation values.
PRECIP (Input) Array of precipitation depths. Each value represents of
EXCESS (Output) Array of precipitation excess depths, including excess
ERRORCODE (Output) Coded integer indicating error number, severity and
ERRORMESSAGE (Output) Errormessage. See Remarks.
Remarks:
Error severity errorMessage
0 0
11 4 Invalid curve number
15 4 Invalid value for impervious area ratio: XXX
Subroutines Called:
IMPERVIOUSAREAEXCESS