Laserfiche WebLink
<br />STATEMENT NUMBERS <br />1795 <br /> <br />OPERATION <br /> <br />Initialize data on CI card in subprogram <br />CARD. <br /> <br />1 BOO <br /> <br />Initialize data on X5 card in subprogram <br />CARD. <br /> <br />1805 <br /> <br />Initialize data on 8T card in subprogram <br />CARD; find maximum low chord and minimum <br />roadway elevations. <br /> <br />2005 - 2060 <br />2065 2130 <br /> <br />Initialize data before reading GR cards. <br /> <br />Read GR cards and store for future use in <br />case modifications are made. <br /> <br />2135 - 2165 <br /> <br />Call ADDPTS to add points for each encroach- <br />ment station given. <br /> <br />2170 - 2305 <br /> <br />Raise elevations by ELSED or ELENCL or ELENCR. <br />Reestablish ELMIN. ELMAX. RBEL. XLBEl. etc. <br /> <br />2310 - 2420 <br /> <br />Raise cross section and multiply stations by <br />ra ti o. <br /> <br />2425 - 2490 <br />2495 - 2585 <br /> <br />,Add poi nts from X4 card to EL and STA arrays. <br /> <br />Modify EL and STA for channel improvement. <br />Call CHIMP. <br /> <br />259D - 2635 <br /> <br />Make the first estimate of the water surface <br />elevation (WSEL) except for the first cross <br />section or for special bridge or for Method <br />3 or 4 encroachment or if special bridge loss <br />is read in. The estimate is based on previous <br />depth of flow or slope of energy grade. <br /> <br />2640 - 2750 <br /> <br />Check WSEL for maximum and minimum conditions <br />and for wrong side of critical depth. <br /> <br />2755 - 2875 <br /> <br />Initialize variables. determine starting <br />station where WSEL crosses the ground on <br />left side. <br /> <br />3150 - 3330 <br /> <br />Calculate area. wetted perimeter and hydraulic <br />radius for an incremental area of the cross <br />section considering the bridge deck (if any). <br /> <br />Determi ne roughness value ("n") to use for <br />current subarea based on left or right over- <br />flow area or channel considering a horizontal <br />or vertical variation. <br /> <br />2880 - 3145 <br /> <br />3335 - 3420 <br /> <br />Determine sums of area and Q1 for channel and <br />overbanks. and printout intermediate answers <br />for each subarea. <br /> <br />15 <br />