計(jì)算水力學(xué)單一河道程序設(shè)計(jì)

1、單一河道程序設(shè)計(jì)單一河道程序設(shè)計(jì)題 目：計(jì)算程序框圖計(jì)算追趕系數(shù)上邊界條件計(jì)算下邊界條件計(jì)算回代計(jì)算水位流量輸出計(jì)算結(jié)果結(jié) 束數(shù)組說(shuō)明開(kāi) 始輸入基本數(shù)據(jù)單位換算初始條件賦值按時(shí)間步長(zhǎng)循環(huán)按時(shí)間步長(zhǎng)循環(huán)1. 數(shù)組說(shuō)明| 水位、流量；河段長(zhǎng)；| p p、v v、s s、t t；糙率。123nn-1 2. 輸入基本數(shù)據(jù)計(jì)算斷面數(shù)、計(jì)算小時(shí)數(shù)、計(jì)算條件、河段長(zhǎng)度、時(shí)步長(zhǎng)、權(quán)重系數(shù)、計(jì)算糙率123nn-1 3. 單位換算時(shí)間單位：秒長(zhǎng)度單位：米123nn-1 n-14. 初始條件賦值| 初始水位條件：z（l+1）=水面線| 初始流量條件： q（l+1）=0.0123nn-1 zz( i ) =4.0+0

2、.025*(n-i)5. 邊界條件賦值上邊界條件上邊界流量條件：123nn-1 5. 邊界條件賦值下邊界條件下邊界水位條件：123nn-1 6. 按時(shí)間步長(zhǎng)循環(huán)計(jì)算追趕系數(shù)上邊界條件計(jì)算下邊界條件計(jì)算回代計(jì)算水位流量輸出計(jì)算結(jié)果按時(shí)間步長(zhǎng)循環(huán)按時(shí)間步長(zhǎng)循環(huán)6. 按時(shí)間步長(zhǎng)循環(huán)其 中：簡(jiǎn)化形式：追追 趕：趕：| 所以所以流量上邊界條件流量上邊界條件追趕：追趕：6. 追趕系數(shù)extern子程序1in上邊界條件p1=q(t)v1=0pi、vi、si、tizi、qiai、bi、ri、uici、di、ei、fi、gi、iy1i、y2i、y3i、y4i abr函數(shù)6. 追趕系數(shù)extern子程序12nn-1上邊界條件p1v1p2v2s2t2ipivisitipn-1vn-1sn-1tn-1pnvnsntn6. 追趕系數(shù)abr子程序100 m31zzd6. 按時(shí)間步長(zhǎng)循環(huán)計(jì)算追趕系數(shù)上邊界條件計(jì)算下邊界條件計(jì)算回代計(jì)算水位流量輸出計(jì)算結(jié)果按時(shí)間步長(zhǎng)循環(huán)按時(shí)間步長(zhǎng)循環(huán)7. 回代計(jì)算baext子程序1inn-1下邊界條件z1qqupupz znnqn=pn-vnznzn-1=sn-tnznqn-1=pn-1-vn-1zn-18. 輸出計(jì)算結(jié)果計(jì)算追趕系數(shù)