双线性插值：格点to站点Fortran程序分享

Rita · 发表于 2015-6-10 16:53:18

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

您需要登录才可以下载或查看，没有帐号？立即注册

x

   最近用到双线性插值，在论坛上搜到清风版主的帖子：
            http://bbs.06climate.com/forum.php?mod=viewthread&tid=6025
   我主要需要格点到站点插值，并且范围较小，因此在清风的原程序上做了如下修改：
         （1）程序针对格点到站点插值
         （2）加入了格点数据和站点数据读取的部分
         （3）增加了起始网格点经纬度（适用于非全球，小范围）
         （4）插值过程中增加了对格点数据是非为缺测的判断。
   现把程序分享给大家，改动不是很大，感谢清风提供的源程序！

yrovl · 发表于 2015-6-10 21:49:35

楼主真心好人啊

shenchan · 发表于 2015-6-19 20:43:42

没有足够的钱来下载

对流云 · 发表于 2015-7-28 17:06:52

多谢楼主分享

xiaoguoguo327 · 发表于 2015-8-19 11:58:17

我有一个问题不太明白，想请教一下楼主，在做插值的时候，为什么原格点数据小于0的时候，就不把这个值算到插值点里呢？
if(oldVal(pos(i,1),pos(i,3))>0.and.oldVal(pos(i,2),pos(i,3))>0) tmpVal_down=weight(i,1)*oldVal(pos(i,1),pos(i,3))+weight(i,2)*oldVal(pos(i,2),pos(i,3))
if(oldVal(pos(i,1),pos(i,3))>0.and.oldVal(pos(i,2),pos(i,3))<0) tmpVal_down=oldVal(pos(i,1),pos(i,3))第二个if语句不太明白，麻烦楼主解释一下，谢谢！

辛延斌 · 发表于 2015-8-27 15:55:52

学习学习赞一个

Rita · 发表于 2015-9-1 11:19:01

xiaoguoguo327 发表于 2015-8-19 11:58
我有一个问题不太明白，想请教一下楼主，在做插值的时候，为什么原格点数据小于0的时候，就不把这个值算到 ...

pos不是格点数据，而是格点的位置

xiaoguoguo327 · 发表于 2015-9-3 08:26:06

嗯，谢谢你！

cx6689942 · 发表于 2015-9-3 08:46:24

楼主是个很敬业的执着者，向你学习了。谢谢分享！

白菜 · 发表于 2015-9-22 16:28:35

楼主很赞！

		自动登录	找回密码
密码			立即注册

[经验总结] 双线性插值：格点to站点Fortran程序分享

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

点评

评分