欢迎来到天天文库
浏览记录
ID:60993499
大小:175.99 KB
页数:8页
时间:2021-01-18
《天气学诊断分析实习报告.docx》由会员上传分享,免费在线阅读,更多相关内容在行业资料-天天文库。
1、《天气学诊断分析》课程实习学生姓名:学号:院系:专业:任课教师:一、实习内容介绍实习目的:熟悉迭代方法在气象中的应用,掌握露点和凝结抬升高度的实际编程计算。实习内容:已知南京站某一时次的相对湿度(97%)、气温(18.4ºC)、气压(1003.5hPa)以及站点高度(35.2m),请利用迭代法求出:(1)该站的露点温度。(2)凝结高度和凝结温度。实习要求:根据实习内容和资料说明,撰写Fortran程序,并运行检查。二、迭代法计算框图(1)Td:在未饱和湿空气中,露点温度Td总低于气温T。我们可以先假设T为露点温度的初值Td0,用Td0计算e的初值e。比较e与es,如果e2、度初值偏高于实际值,可以从初值减去0.05度,并作为新的Td1,再计算出水汽压的新值e1,如果e任然小于e1,说明td1还是小于露点温度,可以再减去0.1,并重复上述步骤。直到计算到第n步,算出en值第一此小于e,那么它对应的Tdn就是所求的露点温度。(2)Zl和Tl:三、相关Fortran程序和实验结果(1)Fortran程序①TdProgramTdrealRH,t,p,e,es,td,a,bb=35.86a=17.2693882read(*,*)RH,t,pes=6.1078*exp(a*(t-273.16)/(t-b))e=es*RH/100dowhile(e3、es=6.1078*exp(a*(t-273.16)/(t-b))enddotd=t-273.16write(*,*)tdend②Zl和TlprogramZlTlrealz,tz,tdz,pz,ez,oz,qz,pl,tl,el,ql,zl,cpcp=1004b=35.86a=17.2693882read(*,*)z,tz,tdz,pzez=6.1078*exp(a*(tdz-273.16)/(tdz-b))oz=tz*(1000/pz)**0.286qz=0.622*ez/(pz-0.378*ez)pl=300dowhile(ql4、6.1078*exp(a*(tl-273.16)/(tl-b))ql=0.622*el/(pl-0.378*el)pl=pl+1enddozl=(9.8*z+cp*tz-cp*tl)/9.8write(*,*)zl,tl,plend(2)实习结果得到Td=17.9°C得到Zl=90.66m,Tl=17.9°C三、过程小结此次实习课程中,我主要了解了利用迭代法求解问题的方法,掌握了用迭代法计算露点温度、凝结高度和凝结温度的计算步骤,并通过编程来实现。通过撰写两个程序,我更加了解了fortran软件的使用方法。
2、度初值偏高于实际值,可以从初值减去0.05度,并作为新的Td1,再计算出水汽压的新值e1,如果e任然小于e1,说明td1还是小于露点温度,可以再减去0.1,并重复上述步骤。直到计算到第n步,算出en值第一此小于e,那么它对应的Tdn就是所求的露点温度。(2)Zl和Tl:三、相关Fortran程序和实验结果(1)Fortran程序①TdProgramTdrealRH,t,p,e,es,td,a,bb=35.86a=17.2693882read(*,*)RH,t,pes=6.1078*exp(a*(t-273.16)/(t-b))e=es*RH/100dowhile(e3、es=6.1078*exp(a*(t-273.16)/(t-b))enddotd=t-273.16write(*,*)tdend②Zl和TlprogramZlTlrealz,tz,tdz,pz,ez,oz,qz,pl,tl,el,ql,zl,cpcp=1004b=35.86a=17.2693882read(*,*)z,tz,tdz,pzez=6.1078*exp(a*(tdz-273.16)/(tdz-b))oz=tz*(1000/pz)**0.286qz=0.622*ez/(pz-0.378*ez)pl=300dowhile(ql4、6.1078*exp(a*(tl-273.16)/(tl-b))ql=0.622*el/(pl-0.378*el)pl=pl+1enddozl=(9.8*z+cp*tz-cp*tl)/9.8write(*,*)zl,tl,plend(2)实习结果得到Td=17.9°C得到Zl=90.66m,Tl=17.9°C三、过程小结此次实习课程中,我主要了解了利用迭代法求解问题的方法,掌握了用迭代法计算露点温度、凝结高度和凝结温度的计算步骤,并通过编程来实现。通过撰写两个程序,我更加了解了fortran软件的使用方法。
3、es=6.1078*exp(a*(t-273.16)/(t-b))enddotd=t-273.16write(*,*)tdend②Zl和TlprogramZlTlrealz,tz,tdz,pz,ez,oz,qz,pl,tl,el,ql,zl,cpcp=1004b=35.86a=17.2693882read(*,*)z,tz,tdz,pzez=6.1078*exp(a*(tdz-273.16)/(tdz-b))oz=tz*(1000/pz)**0.286qz=0.622*ez/(pz-0.378*ez)pl=300dowhile(ql4、6.1078*exp(a*(tl-273.16)/(tl-b))ql=0.622*el/(pl-0.378*el)pl=pl+1enddozl=(9.8*z+cp*tz-cp*tl)/9.8write(*,*)zl,tl,plend(2)实习结果得到Td=17.9°C得到Zl=90.66m,Tl=17.9°C三、过程小结此次实习课程中,我主要了解了利用迭代法求解问题的方法,掌握了用迭代法计算露点温度、凝结高度和凝结温度的计算步骤,并通过编程来实现。通过撰写两个程序,我更加了解了fortran软件的使用方法。
4、6.1078*exp(a*(tl-273.16)/(tl-b))ql=0.622*el/(pl-0.378*el)pl=pl+1enddozl=(9.8*z+cp*tz-cp*tl)/9.8write(*,*)zl,tl,plend(2)实习结果得到Td=17.9°C得到Zl=90.66m,Tl=17.9°C三、过程小结此次实习课程中,我主要了解了利用迭代法求解问题的方法,掌握了用迭代法计算露点温度、凝结高度和凝结温度的计算步骤,并通过编程来实现。通过撰写两个程序,我更加了解了fortran软件的使用方法。
此文档下载收益归作者所有