|
本帖最后由 麒麟 于 2017-2-19 19:05 编辑
程序大致如此,全面的在附件中可以找到。想实现读取两类资料并从中选取经纬度近似的点输出变量。遇见问题在:
1。 if((abs(lonin(l,m)-line(2)).le.0.06).and.(abs(latin(l,m)-line(3)).le.0.06))then !判断两类资料的经纬度间隔最小以输出变量
write(6,'(3i5,3f12.3)')l,m,n,latin(l,m),lonin(l,m), pre_wrf(l,m,n)
这样输出受到外层循环i,j,k的影响,使得输出文件中不停的循环。
请教大家,如何在寻找经纬度相近两点的情况下,输出时间(120次)合适的变量?
|
|