水文预报课程设计任务书Word格式.docx
《水文预报课程设计任务书Word格式.docx》由会员分享，可在线阅读，更多相关《水文预报课程设计任务书Word格式.docx（17页珍藏版）》请在冰豆网上搜索。
2）阅读选择VB程序进行参数率定。
写出程序使用说明书。
4．要求
设计时间为1周，要求独立完成，遇到问题可以互相讨论，Excel计算与VB计算相结合，先Excel，以便熟悉整个过程，并以此作为程序调试的依据。
编程要有流程图，变量说明表，成果表达方式要求多样化（文字、图、表），报告撰写要认真，不得抄袭，随时记录遇到的问题和解决方法。
5．进度
整个设计过程在一周之内完成。
6.成绩评定
考察每个同学的设计原理、审阅设计报告，根据下面的标准或指导教师自定的标准给每位同学评定课程设计考试成绩。
（1）原理设计的正确（60%）
（2）知识点运用得当（10%）
（3）
原理设计合理（20%）
（4）报告撰写准确、无误（10%）
水文预报课程设计指导书
孙守国（指导教师签名）
（教研室主任签名）
2014年3月18日
一．题目
二．设计要求
（二）．写出设计总结报告。
3000左右字。
三．初定参数要求条件：
（请注意自己的计算参数）
学号
WM
WUM
WLM
b
c
1
100
11
69
0.35
0.05
23
120
12
68
2
24
13
67
3
26
14
66
4
27
15
65
5
28
16
64
6
29
17
63
7
30
18
62
8
31
19
61
9
32
20
60
33
0.2
110
34
35
36
37
38
39
40
41
42
21
43
22
44
51
45
52
46
53
47
54
48
55
49
56
50
初始参数WU=0mm,WL=2.0mmWD=20mm
四．工作计划
整个设计过程在一周之内内完成。
先按要求的参数计算，单独保留；
参数调整正确表；
VB整理成和本计算有关的可执行文件。
五、资料
1、变量名
变量
表示的含义
PJ
平均雨量
EW
蒸发皿蒸发量
流域平均蓄水容量
上层蓄水容量
下层蓄水容量
WNM
深层蓄水容量
Nashn
瞬时单位线的参数n
Nashk
瞬时单位线的参数k
Z
QO
出库流量
QI
入库流量
V
水库蓄水量
2、横山水库
横山水库位于江苏省宜兴市宜溧太华山区，是溪河水系的拦蓄工程。
溪河流域面积266平方公里，主流长36公里，于下耕桥注入宜溧河。
横山水库集水面积154.8平方公里，上游山高岭陡，南部主要为太华山区，最高海拔500米以上，地势由南向北减缓，平均高程300米以上，流域内有100多条纵横交错的涧水由南向北呈扇形汇合而下，主要水源有两条：
一是来自宜兴的太华山、襄王岭、分介岭、唐盘山等；
二是来自溧阳的金牛岭，同官岭、松岭等。
主流长13公里，河道坡降千分之6.58，水库周围为建德群火山岩、茅山群灰白、紫红、黄色砂砂岩，石质坚硬，渗水性小，适宜建水库。
流域内植被达98％以上，山上生长成片竹林及各种用材林，浓郁成荫。
山地占80％，可耕地占10％，流域多年平均降水量约1200mm，水面蒸发约950mm，年平均气温15摄氏度左右，属湿润的亚热带季风气候区，全年降水的50~60％集中于6、7、8、9月份，6、7月冷暖气团在上空遭遇，常产生锋面低压和静止锋，形成连续阴雨的梅雨天气，7、8、9月多受热带风暴影响，造成来势迅猛的特大暴雨。
3、三层模型公式
蒸发计算
三层模式蒸发量计算
当WU+P>
=Ep时，
EU=Ep,EL=0,ED=0
当WU+P<
Ep,WL>
=C*WLM
EU=WU+P
EL=（Ep-EU）WL/WLM
ED=0
WU+P<
EpC*（Ep-EU）≤WL<
C*WLM
EU=WU+P
EL=C*（Ep-EU）
Ep,WL<
C*（Ep-EU）
EL=WL
ED=C*（Ep-EU）-EL
E=EU+EL+ED
三层模式计算蓄水量
当WU（i）+P（i）-EU（i）-R（i）<
=WUM时，
WU（i+1）=WU（i）+P（i）-EU（i）-R（i）
WL（i+1）=WL（i）-EL（i）
WD（i+1）=WD（i）-ED（i）
当WU（i）+P（i）-EU（i）-R（i）>
WUM
当WL（i）-EL（i）+（WU（i）+P（i）-EU（i）-R（i）-WUM）<
=WLM
WU（i+1）=WUM
WL（i+1）=WL（i）-EL（i）+（WU（i）+P（i）-EU（i）-R（i）-WUM）
WD（i+1）=WD（i）-ED（i）
当WL（i）-EL（i）+（WU（i）+P（i）-EU（i）-R（i）-WUM）>
WLM
当WD（i）-ED（i）+WL（i）-EL（i）+（WU（i）+P（i）-EU（i）-R（i）-WUM）-WLM<
=WDM时，
WL（i+1）=WLM
WD（i+1）=WD（i）-ED（i）+WL（i）-EL（i）+（WU（i）+P（i）-EU（i）-R（i）-WUM）-WLM
当WD（i）-ED（i）+WL（i）-EL（i）+（WU（i）+P（i）-EU（i）-R（i）-WUM）-WLM>
WDM
WU（i+1）=WUM
WD（i+1）=WDM
W=WU+WL+WD
径流计算
当PE>
0,a+PE<
=WMM时，
当PE>
=WMM时,
R=PE-（WM-W）
当PE<
0时，
R=0
4、附参数率定VB程序
PrivateSubCommand1_Click（）
Dimp（31,13）,ew（31,13）,bt$（14）
Dimp1（367,20）,ew1（367,20）,pe（367,20）,r（367,20）,ep（367,20）
Dimwu（367,20）,wl（367,20）,wd（367,20）,w（367,20）
Dimeu（367,20）,el（367,20）,ed（367,20）,e（367,20
升级会员 