潮汐调和分析与预报(fortran程序)

hillside · 发表于 2013-4-16 00:29:25

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

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

x

本帖最后由 hillside 于 2013-8-1 16:41 编辑

   此程序来自于网络。
程序内容摘录：
!利用潮汐观测数据计算调和常数，并利用主要分潮和浅水分潮进行潮汐预报
program work
implicit none
character*80::a1
character(len=5),dimension(62,16)::aa
integer::bb(62,12),c(62,2),caita(-371:371),i,i1,i2,j,t1
real::N0,n(13,6),a(0:13,0:13),b(1:13,1:13),s,s0,s1,s2,s3,sa,hh             !n代表Doodson代码；a,b为系数矩阵
real::xiaoa(0:13),xiaob(13),gg1,gg2,pjchaocha,t,ma,mi                      !计算法方程所需的参数
real,dimension(1:13)::w,u,f,V0,f1(0:13),f2                               !f1和f2为法方程右边系数
real,dimension(13)::sita,h,g,r,h0(13),g0(13),h1(13),g1(13)                !调和常数参数
real,dimension(-371:371)::caita1,caita3,caita4,caita8,caita9,caita5,caita11 !主分潮、浅水分潮的潮高数值
real,dimension(:),allocatable::hightide,lowtide,chaocha                   !高低潮数值
integer,dimension(:),allocatable::hightrq,lowtrq,hight,hightt,lowt,lowtt

......

mofangbao · 发表于 2013-4-16 09:14:45

楼主发的几个帖子介绍有点少的呀谢谢啦

nan · 发表于 2013-4-20 17:01:50

这个是楼主原创的么

aries147 · 发表于 2013-9-9 17:31:45

不知道好不好用，只能先下来看看，用过我再回复，先谢楼主

jamce · 发表于 2013-9-10 19:19:14

好东西，谢谢同道。

jhwong · 发表于 2013-9-17 18:36:56

不知道好不好用，先謝樓主

鸡蛋小王子 · 发表于 2013-9-17 22:58:14

这不是陈耀登课上让编的嘛

小虫小虫 · 发表于 2013-9-20 15:29:39

好东西，已经收了。学习一下。

1530718856 · 发表于 2014-3-31 22:30:47

好好好啊啊啊啊

xiaxianyue · 发表于 2014-4-6 15:09:49

百度文库也有。。。

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

[源代码] 潮汐调和分析与预报(fortran程序)

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

评分