爱气象,爱气象家园! 

气象家园

 找回密码
 立即注册

QQ登录

只需一步,快速开始

新浪微博登陆

只需一步, 快速开始

搜索
查看: 18141|回复: 29

写了一个修改wrf下垫面的程序,跟大家交流下,欢迎指正

[复制链接]

新浪微博达人勋

发表于 2012-12-3 22:12:03 | 显示全部楼层 |阅读模式

登录后查看更多精彩内容~

您需要 登录 才可以下载或查看,没有帐号?立即注册 新浪微博登陆

x
本帖最后由 wudi1201 于 2012-12-3 22:23 编辑

                                WRF的下垫面比较复杂
          最近交数值作业,以前的同学问我怎么修改下垫面,这个问题比较复杂
     这里写的程序主要是针对WRF中的LANDUSEF、LU_INDEX、LANDMASK几个变量的修改,没有系统的把接口延伸出来......
        有需要的可以参考,欢迎大家提出意见,图中修改的信息主要是,将湖面改为陆地
changeunderlayer.f90 (5.92 KB, 下载次数: 354)

原来的

原来的

修改后的

修改后的
密码修改失败请联系微信:mofangbao

新浪微博达人勋

发表于 2012-12-4 08:27:52 | 显示全部楼层
,真不错!
密码修改失败请联系微信:mofangbao

新浪微博达人勋

发表于 2012-12-4 11:31:55 | 显示全部楼层
很不错。用ncl也可以很轻松的搞定。
密码修改失败请联系微信:mofangbao

新浪微博达人勋

发表于 2012-12-4 14:48:31 | 显示全部楼层
下载下来学习一下!
密码修改失败请联系微信:mofangbao

新浪微博达人勋

发表于 2012-12-9 09:11:20 | 显示全部楼层
WRF官网上有一个read_wrf_nc的FORTRAN源程序,专门用来修改这类参数的
密码修改失败请联系微信:mofangbao

新浪微博达人勋

发表于 2013-2-1 11:56:47 | 显示全部楼层
很不错,谢谢!
密码修改失败请联系微信:mofangbao

新浪微博达人勋

发表于 2013-8-2 19:20:26 | 显示全部楼层
不错,收集了
密码修改失败请联系微信:mofangbao

新浪微博达人勋

发表于 2013-8-17 15:45:01 | 显示全部楼层
密码修改失败请联系微信:mofangbao

新浪微博达人勋

发表于 2013-11-16 17:08:24 | 显示全部楼层
太感谢楼主了,楼主V5
密码修改失败请联系微信:mofangbao

新浪微博达人勋

发表于 2014-4-22 23:23:32 | 显示全部楼层
请问,您在fortran里修改完后,怎么放到wrf里的,status0=nf_put_vara_real(ncid0,varid0,start,count0,rvals0)
status0=nf_put_vara_real(ncid0,varid01,start,count0,varlandmask0)
status0=nf_put_vara_real(ncid0,varid02,start0,count2,varlandusef0)
status0=nf_close(ncid0)         
status1=nf_put_vara_real(ncid1,varid1,start,count1,rvals1)
status1=nf_put_vara_real(ncid1,varid11,start,count1,varlandmask1)
status1=nf_put_vara_real(ncid1,varid12,start0,count3,varlandusef1)
status1=nf_close(ncid1)  
这一段程序是做什么的,我没有看懂,请指教!
密码修改失败请联系微信:mofangbao
您需要登录后才可以回帖 登录 | 立即注册 新浪微博登陆

本版积分规则

Copyright ©2011-2014 bbs.06climate.com All Rights Reserved.  Powered by Discuz! (京ICP-10201084)

本站信息均由会员发表,不代表气象家园立场,禁止在本站发表与国家法律相抵触言论

快速回复 返回顶部 返回列表