计算涡度、涡度平流、温度平流、散度、水汽通量、水汽通量散度、比湿等的FORTRAN程序

悠然一梦123 · 发表于 2015-4-9 21:19:05

谢谢楼主，正需要

李山山0103 · 发表于 2015-4-9 22:39:39

不错正在学

lucy_9208 · 发表于 2015-4-14 11:07:07

谢谢楼主分享~fortran这块程序真没搜到几个

悠悠化羽 · 发表于 2015-4-14 11:28:57

急需的程序，谢了

lgh771023 · 发表于 2015-4-14 15:50:11

计算涡度、温度平流的程序

hmyjoyce · 发表于 2015-4-15 17:31:08

感谢分享，很实用~

nathalie · 发表于 2015-4-21 11:47:00

感谢分享之前下过一次不知道搞哪里去了。。。又跑来关顾了哈哈！

mengnannan1314 · 发表于 2015-4-21 12:18:42

很有用。谢谢

lzuatmos · 发表于 2015-4-23 14:26:37

楼主，麻烦问一下，为什么计算涡度的公式与气象诊断书上的公式不同？
书上的公式为：
vor = m(i,j)/2d * [(v(i,j+1)-v(i,j-1)) - (u(i-1,j)-u(i+1,j))]
其中，m为地图投影放大因子，d为网格距。
楼主的公式为:
vor = 1/R^2 * [(v(i+1,j)-v(i-1,j)/(delta*pi/180*cos(theta)) - (u(i,j+1)-u(i,j-1)/(delta*pi/180)) + 2*u(i,j)*tg(theta)]
我将书上的公式在网格上标出来以后很直观，但是楼主所用公式在网格上标出来以后貌似不是很直观。是不是差值的方法不同？或者是网格点i,j的方向选取不同？
所以想麻烦问一下：
1）i,j哪个代表水平方向的网格点（纬向，不同经度），哪个代表竖直方向的网格点（经向，不同纬度）？
2）为什么加一项这个2*u(i,j)*tg(theta)？
或者有没有参考公式的出处？多谢！

凡不凡 · 发表于 2015-4-23 16:15:31

谢谢大神的分享

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

[源代码] 计算涡度、涡度平流、温度平流、散度、水汽通量、水汽通量散度、比湿等的FORTRAN程序