博文

Fortran 90 实现 Vondrak 滤波

2013-11-2 22:43

捷克天文学家J. Vondrak提出了一种能够在未知拟合函数形式的情况下，对测量资料进行合理平滑的方法，有时也称之为最优平滑法。这种方法还具有较好的滤波性能，目前已在国内外天文地球动力学等领域得到了广泛有效的应用。 源码在Linux64和Win64下编译通过，验证实际数据通过，对Vondra ...

个人分类: Fortran|4456 次阅读|没有评论

修正致命bug：Fortran 90 实现高斯权函数平滑法

2013-11-2 10:19

非常抱歉，各位，原来上传的关于高斯权函数平滑的Fortran程序有个致命的错误，现在重新上传修正bug后的，大家如果有下载的，要重新下载下，里面的时间引数搞错了，谢谢。 高斯权函数的卷积平滑法有时亦简称为高斯平滑法，在天文地球动力学的观测资料处理中应用较多，其主要原理是将测量数据y(ti), i = 1,2,...,N ...

个人分类: Fortran|5467 次阅读|没有评论

Fortran 90: a simple example of array pointer

2013-10-29 13:40

PROGRAM test IMPLICIT NONE INTEGER(kind=4), DIMENSION(:), POINTER :: a LOGICAL :: allocat INTEGER(kind=4) &nb ...

个人分类: Fortran|2556 次阅读|没有评论

Fortran 90 实现高斯权函数平滑法

2013-10-18 20:48

高斯权函数的卷积平滑法有时亦简称为高斯平滑法，在天文地球动力学的观测资料处理中应用较多，其主要原理是将测量数据y(ti), i = 1,2,...,N与一个高斯曲线分布的权函数作为卷积计算，求得测量数据的平滑值。由于 高斯权函数平滑法简单，计算机易于实现，且既可用于等间隔又可用于不等间隔数据，因此应用范围较广。 ...

个人分类: Fortran|5468 次阅读|没有评论

北斗轨道图GMT源码已开放

2013-10-16 21:51

北斗轨道图GMT源码已开放，由于数据较大，附件上传受限，如果有需要，请发送邮件至zhouforme@cgu.org.cn。 效果图：

个人分类: GMT|3843 次阅读|没有评论

RINEX3转换成RINEX2文件（已更新下载地址）

2013-10-16 21:47

现在rinex3.02格式已经完善,而目前有些软件还是无法处理rinex3导航文件和观测值文件,比较出名的比如GAMIT和TEQC,其它还是未知,因此rinex3转成rinex2很有必要,闲暇之余,写了NAVRX32模块,方便有需要的同学使用,目前功能是完成了导航文件的转换,观测值文件还在完善之中,可提供Linux 64位，Windows 64位等版本，下载地 ...

个人分类: Fortran|15258 次阅读|没有评论

Linux下 Fortran 90 不同目录的modules和主程序的编译链接

热度 2 2013-10-11 07:59

昨天在Linux下编译fortran90的modules的时候出现问题，比如我在main目录下有mod和src两个目录，mod目录下test1.f90 这个module，src目录下有test2.f90这个module，当然多个modules也类似（下面的过程就需要写makefile来实现，更方便快捷），src有个test_src目录，里面有test.f90主程序，正确编译链接除了要加 use x ...

个人分类: Fortran|14027 次阅读|2 个评论 热度 2

本页有 3 篇博文因作者的隐私设置或未通过审核而隐藏