Laserfiche WebLink
<br />STATEMENT NUMBERS <br />1700 - 1745 <br /> <br />OPERATION <br /> <br />Initialize variables for SB card, call BLFLO <br />to determine WSEL for low flow. <br /> <br />1755 <br /> <br />Initial i ze variables for NC card in subprogram <br />CM D . <br />Initial ize variables for QT card in subprogram <br />CARD. <br />Initialize variables for NV card in subprogram <br />CARD. <br />Initial i ze variables for NH card in subprogram <br />CARD. <br />Initialize variables for ET card in subprogram <br />CARD. <br /> <br />1750 <br /> <br />1760 <br /> <br />1765 <br /> <br />1770 <br /> <br />(3010 - 3040)* <br /> <br />1775 <br /> <br />Determine WSEL for tributary stream from <br />summary table of previous computations. <br /> <br />Initialize data from Xl card in subprogram <br />CARD. <br /> <br />(3130 3155)* <br /> <br />Initialize data in case X2,X3, X4, X5 cards <br />are not read. <br /> <br />(3160 - 3200)* <br /> <br />Determine WSEL for first guess for encroach- <br />ments by conveyance. <br /> <br />(3205 - 3235)* <br />1815 - 1855 <br /> <br />Determine encroachment stations by Method 2. <br /> <br />Return EL. STA to original cross section <br />since GR cards are omitted. <br /> <br />1860 - 1890 <br /> <br />Set up to calculate interpolated cross <br />section. <br /> <br />1895 - 1980 <br /> <br />Modify cross section by ratio and raise or <br />lower. <br /> <br />2000 <br /> <br />Return to read new card if not an interpolated <br />cross secti on. <br /> <br />1780 <br /> <br />Initialize data on X2 card in subprogram <br />CARD. <br /> <br />1785 <br /> <br />Initialize data on X3 card in subprogram <br />CARD. <br /> <br />1790 <br /> <br />Initialize data on X4 card in subprogram <br />CARD. <br /> <br />*Statement numbers are located in subprogram CARD. <br /> <br />14 <br />