WSPC12748

• File Number: 8220.102.P
• Description: Aspinall Unit - CRSP
• State: CO
• Basin: Gunnison
• Date: 1/1/1975
• Author: USDOI/BOR
• Title: Data for Gunnison River - Mostly 1975, some presumed later,with staff comments
• Water Supply Pro - Doc Type: Data

FUNCTION "BMVolumeloReleaseo ( )
RETURN_TYPE NUMERIC;
SCALE_UNITS "0;
DESCRIPTION ..";
ACTIVE TRUE;
PRE_EXEC_DIAG FALSE;
POST_EXEC_DIAG FALSE;
BEGIN

"Max"( 0.0?0ooooo ["acre-ft"), "BMRemaininglnflow"( ) - "BMSlorageTargel"( ) - "TPStorageAdj"( ) + S "BlueMesa.Slorage" [@"Previous Timeslep") );

END;

FUNCTION "BMRemaininglnflow" ( l
RETURN_TYPE NUMERIC;
SCALE_UNITS ..";
Dr:SCRIP1l0N ....;
AC"llVE TRUE;
I'I<E_EXEC_DIAG FALSE;
POS'I~EXEC_DIAG FALSE;
BEGIN

S "HistorieData.bm&cst" [] · $ "RulesData.BMFestErT'" ["BMFcstErr", "GelMonlhAsSlring"( @"Current Timestep" ))- S "HiSloricData.bmcull\unrg" [);

END;

FUNCTION "BMtoCRRemaininRlnflow" ( 1.
RETURN_TYPE NUMERIC;
SCALE_UNITS ....;
DESCRIPTION ..";
ACTIVE TRUE;
PRE_EXEC_DIAG FALSE;
POST_EXEC_DIAG FALSE;
BEGIN

IF ( "GetMonth"( @"Current Timestep" ) < 4.0??oo000 )
THEN
S "HisloricData.sideInflowFrcst" [] - ("SumFlowsToVolume"( S "BMIoMP.Inflow2",@"24:00:00January I, Current Year", @"Current Timestep") + "SumFlowsToVolume"( $ "MPloCRY.lnflow2", @"24:00:00
January I, Current Year",@"Current Timestep" ))
ELSE
IF ( "GetMonth"( @"Current Timestep" ) < 8.00000000 )
THEN
S "HistoricData.SidelnflowFrcst" [] - ("SumFlowsToVolume"( $ "BMtoMP.lnflow2", @"24:00:00 April I , Current Year", @"Current Timestep" ) + "SumFlowsToyolume"( $ "MPloCRY.lnnow2", @"24:00:00
April I, Current Year", @"Current Timestep" ) ) ,
ELSE
S "HistoricData.SideInflowFrcst" [] - ("SumFlowsToVolume"( $ "BMtoMP.lnflow2", @"24:00:00 August I, Current Year", @"Current Timestep" ) + "SumFlowsToVolume"( $ "MPtoCRY.lnflow2", @"24:00:00
August I, Current Year",@"Current Timestep" ))
ENDIF
ENDIF;

END;

FUNCTION "TunneIRemainingDmd" ( )
RETURN_TYPE NUMERIC;
SCALE_UNITS "";
DESCRIPTION ....;