报告彩虹实验报告Word格式.docx
《报告彩虹实验报告Word格式.docx》由会员分享，可在线阅读，更多相关《报告彩虹实验报告Word格式.docx（18页珍藏版）》请在冰点文库上搜索。
7.编写计算均值、变率和距平的子程序。
8.调用子程序分别计算强度、面积、经度、纬度环流指数的均值、变率和距平。
9.将蒙古高压环流指数的均值和变率写入到“mh1.dat”和“mh1.grd”两个文件中。
将蒙古高压环流指数的距平值写入到“mh2.dat”和“mh2.grd”两个文件中。
10.编译、构建、运行、调试Fortran程序。
蒙古高压环流指数距平时间序列图绘制
1.为蒙古高压环流指数距平数据文件“mh2.grd”书写数据描述文件“mh2.ctl”，在此文件中定义四个变量p、s、lo、la。
2.编写“mh2.gs”可执行文件，利用GrADS基本操作命令和line、bar两种绘图类型的绘图要素设置，以不同颜色和线形显示蒙古高压强度和面积时间序列图（曲线），分别以不同颜色显示蒙古高压经度和纬度时间序列图（柱状）。
3.将蒙古高压强度和面积时间序列图（曲线）保存到“mhline.gmf”，将蒙古高压经度和纬度时间序列图（柱状）分别保存到“mhlonbar.gmf”和“mhlatbar.gmf”中。
4.启动GrADS，调试、执行“mh2.gs”。
5.分析蒙古高压气候及其异常特征。
五、实习关键技术及方法
x、y的n对观测资料x1,x2,...,xn和y1,y2,...,yn，则样本的相关系数rxy可这样计算
rxy?
1n（xt?
）（yt?
）?
其中x表示压强，y表示气温，r表示相关系数。
程序设计
以下程序用于蒙古高压环流指数气候及异常值计算。
（Fortran程序编写）
PROGRAMEX034
IMPLICITnone
integer,parameter:
:
ny=60
real
p（ny）,s（ny）,lon（ny）,lat（ny）,pa（ny）,sa（ny）,lona（ny）,lata（ny）,pav,sav,lonav,latav,pd,sd,lond,latd
integeri,j,k
open（1,file='
D:
\shixi4\p.dat'
form='
formatted'
）open（2,file='
\shixi4\s.dat'
）
open（3,file='
\shixi4\lon.dat'
）open（4,file='
\shixi4\lat.dat'
）doi=1,ny
read（1,*）,p（i）
read（2,*）,s（i）
read（3,*）,lon（i）
read（4,*）,lat（i）
enddo
close
（1）
close
（2）
close（3）
close（4）
callcha（ny,p,pa,pav,pd）
callcha（ny,s,sa,sav,sd）
callcha（ny,lon,lona,lonav,lond）
callcha（ny,lat,lata,latav,latd）
open（5,file='
\shixi4\mh1.dat'
）write（5,*）,pav,pd
write（5,*）,sav,sd
write（5,*）,lonav,lond
write（5,*）,latav,latd
close（5）
open（6,file='
\shixi4\mh1.grd'
binary'
write（6）,pav,pd
write（6）,sav,sd
write（6）,lonav,lond
write（6）,latav,latd
close（6）
open（7,file='
\shixi4\mh2.dat'
）write（7,*）,pa（60）
write（7,*）,sa（60）
write（7,*）,lona（60）
write（7,*）,lata（60）
close（7）
open（8,file='
\shixi4\mh2.grd'
）Do
write（8）,pa（i）write（8）,sa（i）
write（8）,lona（i）write（8）,lata（i）
close（8）end
subroutinecha（ny,x,xa,xav,xd）
integer:
ny
integeri
real:
x（ny）,xa（ny）,xav,xd,sum
sum=0
doi=1,ny
sum=sum+x（i）
Enddo
xav=sum/ny
xd=0
xa（i）=x（i）-xav
xd=xa（i）*xa（i）+xd
enddo
xd=sqrt（xd/ny）
Returnend
mh2.ctl”
dsetD:
\shixi4\mh2.grd
undef-9.99E+33
titleTheMongolianhighpressure
xdef1levels1
ydef1levels1
zdef1levels1
tdef60linearJAN19511yrGrADS程序编写）以下程序用于蒙古高压环流指数距平值绘图。
（“
vars4
p00qiangdu
s00mianji
lo00jingdu
la00weidu
endvars
“mh2.gs”
'
reinit'
'
openD:
\shixi4\mh2.ctl'
enableprintD:
\shixi4\mhline.gmf'
setlat1'
setlon1'
setlev1'
sett160'
setgxoutline'
setccolor1'
setcstyle1'
setcthick6'
setcmark1'
dp'
setccolor2'
setcstyle2'
setcmark2'
ds'
print'
disableprint'
'
c'
\shixi4\mhlonbar.gmf'
setgxoutbar'
setbarbase0'
setbargap30'
setccolor3'
\shixi4\mhlatbar.gmf'
篇二：
XX1344075王彩虹实验五
南京信息工程大学实验（实习）报告实验（实习）名称与Grads相关的应用
（2）实验（实习）日期马利系计软院专业软件工程年级13班次3姓名王彩虹学号XX1344075
问题描述
利用1948-XX年NCAR/NCEP月平均气温和降水再分析资料（nc格式文件），分析1月气温和降水气候特征。
要求利用Fortran提取1948-XX年1月数据并进行计算，以“*.grd”格式保存1948-XX年1月气温、降水气候场数据，用GrADS生成1948-XX年1月气温、降水气候二维等值线和二维填色图两种格式叠加的图像，书写标题，并在高温、低温中心标记“H”和“L”。
保存并分析之。
1）问题分析
1948-XX年NCAR/NCEP月降水和气温再分析资料。
绘制：
1948-XX年1月气温、降水气候图。
通过分析，首先用Grads将从NCAR/NCEP月气温和降水再分析资料（nc格式
文件）中提取气温和降水1月逐年数据，并保存为为grd格式文件，再用Fortran程序利用grd格式资料按照公式求得气温和降水的气候值，用GrADS绘制二者的气候图，分析1948-XX年1月蒙古高压气候特征。
三、实验步骤
分析问题，理清算法和程序，设计和编写程序。
①书写“air1948-XX-1.gs”和“pre1948-XX-1.gs”从NCAR/NCEP再分析资料（nc格式），利用fwrite提取1月逐年数据，生成气温、降水1月的二进制数据“air1.grd”、“pre1.grd”，编写1月气温、降水资料“air1.grd”、“pre11.grd”的数据描述文件“air1.ctl”、“pre1.ct（本文来自：
小草范文网:
彩虹实验报告）l”。
②启动软件开发环境MicrosoftDeveloperStudio。
③在D盘上创建新工作区shixi05。
④在工作区shixi2内创建新项目shixi05。
⑤在项目shixi21内创建源程序文件“shixi05.f90”，编辑输入源程序文本，打开1948-XX年1月气温、降水资料“air1.grd”、“pre1.grd”，根据求均值公式求得1948-XX年1月气温、降水气候场值。
⑥编译、构建、运行、调试Fortran程序，生成1948-XX年1月气温、降水气候场数据“tc1.grd”、“pc1.grd”。
⑦打开记事本，编写“tc1.grd”和“pc1.grd”的数据描述文件“tc1.ctl”和“pc1.ctl”。
⑧利用GrADS的基本绘图命令和contour、shaded两种图形类型的图形设置方法和图形
要素设置方法以及基本绘图命令，利用printim和enableprint两种输出图像方法及输出图像格式设置，编写“tc1.gs”和“pc1.gs”。
⑨启动GrADS，运行、调试“tc1.gs”和“pc1.gs”，保存气温、降水气候图“tc1.gmf”、“pc1.gmf”或者“tc1.gif”、“pc1.gif”。
⑩分析1948-XX年1月蒙古高压气候特征。
提取NCAR/NCEP再分析资料中1月气温、降水二进制数据
①“air1948-XX-1.gs”
sdfopenD:
\shixi5\gxoutfwrite'
setfwriteD:
\shixi5\air1.grd'
setx1144'
sety173'
i=1
while（i '
sett'
i'
dair'
i=i+12
endwhile
disablefwrite'
;
②“pre1948-XX-1.gs”
j=1
\shixi5\pr_
setgxoutfwrite'
\shixi5\pre1.grd'
dpr_wtr'
编写“air1.grd”、“pre1.grd”数据描述文件“air1.ctl”和“pre1.ctl”。
③“air1.ctl”
\shixi5\air1.grd
titleairtemperatureofNCEPReanalysisinJan
xdef144linear02.5
ydef73linear-902.5
zdef1linear01
tdef63linear00Z01JAN19481mo
vars1
air0t,y,xWinterAirTemperature
④“pre1.ctl”
\shixi5\pre1.grd
titleprecipitablewaterofNCEPReanalysisinJan
undef-9.96921e+36
pr_wtr0t,y,xprecipitablewaterinJan
2）计算1948-XX年1月气温、降水气候值
①shixi05.f90
programex05
parameter（it=144,jt=73,lt=63）
dimensionair（1:
it,jt,lt）,pre（1:
it,jt,lt）,tc1（1:
it,jt）,pc1（1:
it,jt）
realair（63,73,1）
realpre（63,73,1）
realtc1（63,73）
realpc1（63,73）
）dol=1,lt
read
（1）（（air（i,j,l）,i=1,it）,j=1,jt）
open（2,file='
dol=1,lt
read
（2）（（pre（i,j,l）,i=1,it）,j=1,jt）enddo
doj=1,jt
doi=1,it
tc1（i,j）=0
pc1（i,j）=0
!
求每个格点1月气温、降水气候值
tc1（i,j）=tc1（i,j）+air（i,j,l）
pc1（i,j）=pc1（i,j）+pre（i,j,l）
tc1（i,j）=tc1（i,j）/lt
pc1（i,j）=pc1（i,j）/lt
open（3,file='
\shixi5\tc1.grd'
）
write（3）（（tc1（i,j）,i=1,it）,j=1,jt）close（3）
open（4,file='
\shixi5\pc1.grd'
write（4）（（pc1（i,j）,i=1,it）,j=1,jt）
End
编写“tc1.grd”、“pc1.grd”数据描述文件“tc1.ctl”、“pc1.ctl”。
②“tc1.ctl”
\shixi5\tc1.grd
titleairtemperatureNCEPReanalysisinJan
tdef63linear00Z01JAN19481mo
air0t,y,xAirTemperature
③“pc1.ctl”
\shixi5\pc1.grd
titlewinterprecipitablewaterNCEPReanalysis
pr_wtr0t,y,xWinterprecipitablewater
Endvars
绘制1948-XX年1月气温、降水气候图④tc1.gs
\shixi5\tc1.gmf'
\shixi5\tc1.ctl'
setgradsoff'
setx1144'
sety173'
sett1'
setgxoutshaded'
setgxoutcontour'
setcsmoothon'
drawtitleThetemperatureinJanfrom1948toXX'
setstring3c1.2'
drawstring43.5H'
setstring11c1.2'
drawstring2.875.32L'
drawstring5.107.02L'
drawstring8.643.58L'
drawstring2.551.46L'
⑤pc1.gs
\shixi5\pc1.gmf'
\shixi5\pc1.ctl'
setlon0360'
setlat-9090'
drawtitleTheprecipatationinJanfrom1948toXX'
四、实验结果：
篇三：
光学实验报告（一步彩虹全息）
光学设计性实验报告
（一步彩虹全息）
姓名：
学号：
学院：
物理学院
一步彩虹全息
摘要彩虹全息是用激光记录全息图,是用白光再现单色或彩色像的一种全息技术。
彩虹全息术的关键之处是在成像光路（即记录光路）中加入一狭缝,这样在干板上也会留下狭缝的像。
本文研究了一步彩虹全息图的记录和再现景象的基本原理、一步彩虹全息图与普通全息图的区别和联系、一步彩虹全息的实验光路图，探讨了拍摄一步彩虹全息图的技术要求和注意事项，指出了一步彩虹全息图的制作要点,得出了影响拍摄效果的佳狭缝宽度、最佳狭缝位置及曝光时间对彩虹全息图再现像的影响。
关键词：
一步彩虹全息；
狭缝；
再现
1光学实验必须要严密，尽可能地减少实验所产生的误差；
2实验仪器
防震全息台激光器分束镜成像透镜狭缝干板架光学元件架若干干板备件盒洗像设备一套线绳辅助棒扩束镜2个反射镜2个3实验原理
3.1像面全息图
像面全息图的拍摄是用成像系统使物体成像在全息底板上，在引入一束与之相干的参照光束，即成像面全息图，它可用白光再现。
再现象点的位置随波长而变化，其变化量取决于物体到全息平面的距离。
像面全息图的像（或物）位于全息图平面上，再现像也位于全息图上，只是看起来颜色有变化。
因此在白光照射下，会因观察角度不同呈现的颜色亦不同。
3.2彩虹全息的本质
彩虹全息的本质是要在观察者与物体的再现象之间形成一狭缝像，使观察者通过狭缝像来看物体的像，以实现白光再现单色像。
若观察者的眼
升级会员 