- 积分
- 1422
- 贡献
-
- 精华
- 在线时间
- 小时
- 注册时间
- 2016-9-12
- 最后登录
- 1970-1-1
|
楼主 |
发表于 2018-1-29 20:38:16
|
显示全部楼层
f0 = addfile("wrfout/wrfout_d01_1965-08-31_00:00:00.nc","r")
RAINC = wrf_user_getvar(f0,"RAINC",0)
RAINNC = wrf_user_getvar(f0,"RAINNC",0)
RainTotal=new((/174,209/),float,-999)
do i=0,173
do j=0,208
if((.not.ismissing(RAINC(i,j))).and.(.not.ismissing(RAINNC(i,j))).and.(RAINC(i,j).gt.0.0).and.(RAINNC(i,j))) then
RainTotal(i,j)=RAINC(i,j)+RAINNC(i,j)
end if
end do
end do
f1 = addfile("wrfout_d01_1965-09-01_00:00:00.nc","r")
RAINC1 = wrf_user_getvar(f1,"RAINC",0)
RAINNC1 = wrf_user_getvar(f1,"RAINNC",0)
RainTotal1=new((/174,209/),float,-999)
do i=0,173
do j=0,208
if((.not.ismissing(RAINC1(i,j))).and.(.not.ismissing(RAINNC1(i,j))).and.(RAINC1(i,j).gt.0.0).and.(RAINNC1(i,j))) then
RainTotal1(i,j)=RAINC1(i,j)+RAINNC1(i,j)
end if
end do
end do
RainTotal2=new((/174,209/),float,-999)
do i=0,173
do j=0,208
if((.not.ismissing(RainTotal1(i,j))).and.(.not.ismissing(RainTotal(i,j))).and.(RainTotal1(i,j).gt.0.0).and.(RainTotal(i,j))) then
RainTotal2(i,j) = RainTotal1(i,j)-RainTotal(i,j)
end if
end do
end do |
|