My WebLink
|
Help
|
About
|
Sign Out
Home
Browse
Search
WSPC12748
CWCB
>
Water Supply Protection
>
DayForward
>
1001-2000
>
WSPC12748
Metadata
Thumbnails
Annotations
Entry Properties
Last modified
1/26/2010 4:34:20 PM
Creation date
3/28/2008 11:36:32 AM
Metadata
Fields
Template:
Water Supply Protection
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
There are no annotations on this page.
Document management portal powered by Laserfiche WebLink 9 © 1998-2015
Laserfiche.
All rights reserved.
/
87
PDF
Print
Pages to print
Enter page numbers and/or page ranges separated by commas. For example, 1,3,5-12.
After downloading, print the document using a PDF reader (e.g. Adobe Reader).
Show annotations
View images
View plain text
<br />I~ .y""'inIiI."':.. <br />ION '... <br />XEC_COm~INTTRUE; <br /> <br />PRINT (STRJNGJIIY S .MonowPoinI.OUlnOw. []) CONCAT. MP oul.; <br />PRINT .GdMaxOulllowGi>cn.lnllow"( % "Crystal", S .MOITOWPoilu.OUlllow. n.@"CWTCllITimeslep")CONCAT'ITlllXOUI siven in"; <br />PRINT .BMRcmoininslntlow"( ) CONCA T 'bm Remain innow"; . <br />PRINT "BMVolumetoReIcase.( ) CONCA T .bm wi 10 rei.; <br />PRINT S .HistoricDala.bmfn:st. n CONCA T "1m /Test.; <br />PRINT S .HisloricDala.bmcUllllnrs. [] CONCA T .Im cum unrcs.; <br />PRINT .BMS'ora&cTlrJct.( ); <br />PRINT "TPSlorageAdj"( ) CONCA T "tp adj"; <br />PRINT .BMloCRRcmaininsfnllow'( ) CONCA T "tol remain side inl"; <br />PRINT "TunnclRcmainingOtm"( ) CONCAT.remain tunnel.; <br />PRINT "CanyonRcmainiogMinDm( ) CONCA T .remain cany"; <br />PRINT .BMOpctVoIunEloRclcase"( ) CONCAT"Im Op Vo/to RcI"; <br />PRINT .CROperVoIumctoReIcase.( ) CONCAT .cr op wi 10 Rei"; <br />PRINT .CROpcrtdoasciaCF"( ) CONCAT .cr Op rd cCs.; <br />PRINT .Can)OnMinTrouITlrJct.( ) CONCAT.min ItouIlal'Jlct.; <br />EN/). <br />~Ic .~...;.tp 2.' <br />ION '-. <br />. . _~TKVE; <br /> <br />P/(INT .SMMu/JlcyRdtale"( ,CONCAT "1m mu clco"; <br />nlH., "g",,,,......( ) CONCA T "1m.... rd"; <br />PICINT .Shcwr'l'ennI1",RcI"( 'CONCA T "1m Ihan Imn"; <br />"ICINT.~T,ClUI"( 'CONCAT.....uOlll.. <br />PkJNT .~rOUl.( ) CONCAT.mu UOld', <br />END; <br /> <br /> <br />s~ frr--+ <br />6FF <br /> <br />RULE "CRRelease=intlows w/check"; <br />PRIORITY 10; <br />DESCRIPTION "0; <br />ALIIVE . TRUE; <br />RULE_EXEC_CONSTRAINT TRUE; <br />BEGIN . <br /> <br />S "Crystal.Outtlow" [] := IF ($ "Crystal.Intlow" [] >= "GetMaxOutflowGivenlntlow"( % "Crystal", $ .Crystal.lntlow" n. @"Current Til'nestep") OR $ "Crystal.Pool ~Ic:valilm" [@"PrevillllS Tinlllstel1") >= S <br />"ReservoirData.MaxElevation" [1.00??oo00, 0.?0ooooo0]) . <br />THEN , <br />"GetMaxOuttlowGivenlntlow"( % "Crystal", $ "Crystal.lntlow" n, @"Current Timestep" ) <br />ELSE <br />$ "Crystal./ntlow" [] <br />ENDIP; <br /> <br />;4 II (p...v !;. <br /> <br />for <br /> <br />s ~V' (;, t..~..12.- d w--v- , ~ <br /> <br />8f /1 <br /> <br />END; <br /> <br />END; <br /> <br />UTILITY_GROUP "Utility Group I"; <br />DESCRIPTION ""; <br />ACTIVE TRUE; <br />BEGIN <br />~~--~ -----~~ <br />.' FUNCTION ~BMStora~eTareet" ( ) <br />RETURN_TYPE NUMERIC; <br />SCALE_UNITS ....; <br />DESCRIPTION ....; <br />ACTIVE TRUE; <br />PRE_EXEC_DlAG FALSE; <br /> <br />-~ <br /> <br />C---,~ <br /> <br />- <br /> <br />..............- - ~ ~- --- <br />~ 1 (01" e..r.::-.::;...s f V o-/u.e-. <br /> <br />~ <br /> <br />,~ <br />
The URL can be used to link to this page
Your browser does not support the video tag.