论坛首页    职业区    学术与写作    工程技术区    软件区    资料区    商务合作区    社区办公室
 您好! 欢迎 登录注册 最新帖子 邀请注册 活动聚焦 统计排行 社区服务 帮助
 
  • 帖子
  • 日志
  • 用户
  • 版块
  • 群组
帖子
  • 21767阅读
  • 80回复

自编反应谱计算Fortran程序! [复制链接]

上一主题 下一主题
离线ricozhou1231
 

发帖
74
土币
611
威望
324
原创币
0
只看楼主 正序阅读 使用道具 楼主  发表于: 2010-04-12
昨天学习了hoverdyh博士的“自编反应谱计算MATLAB程序!”,收益颇多,但是matlab的一个重要的问题是在matlab的环境下才能运行,因此我试着稍微改编了一下m文件成Fortran程序,不过计算方法有所减少,只应用了纽马克线性加速度法计算反应谱,而且只能一次输出一个阻尼值对应的反应谱。通过对比seismosignal的计算结果,其默认计算方法与此程序的结果基本一样,误差不超过1%!特把fortran源程序以及exe文件贴出来,相互学习。 efSM`!%j  
w:??h4lt  
注:反应谱计算fortran编写.rar 里的datainput.dat文件刚开始忘记输入阻尼了,现在已经改好重新贴上。
[ 此帖被ricozhou1231在2010-04-13 09:15重新编辑 ]
附件: newmarkresp.rar (2 K) 下载次数:433
附件: 反应谱计算fortran编写.rar (136 K) 下载次数:780
2条评分土币+5
little_stone 土币 +2 太好了!谢谢楼主! 2011-08-06
jun_118899 土币 +3 优秀资料,感谢! 2011-05-03
离线bdwang

发帖
2
土币
1
威望
0
原创币
0
只看该作者 80楼 发表于: 2023-05-28
好程序,支持楼主
离线18409040126

发帖
106
土币
88
威望
5
原创币
0
只看该作者 79楼 发表于: 2022-05-15
      
离线201756505234

发帖
2
土币
1
威望
0
原创币
0
只看该作者 78楼 发表于: 2021-12-30
非常感谢,目前正需要这个
离线zhangjunying

发帖
5
土币
1
威望
0
原创币
0
只看该作者 77楼 发表于: 2021-12-04
支持原创,正打算学习下。
离线hamicat2002

发帖
5
土币
590
威望
0
原创币
0
只看该作者 76楼 发表于: 2020-12-31
谢谢楼主分享
离线xjtu713

发帖
137
土币
59
威望
416
原创币
0
只看该作者 75楼 发表于: 2020-06-11
好东西,好好学习一下!
喜欢学习!!
离线天啊

发帖
693
土币
301
威望
2439
原创币
0
只看该作者 74楼 发表于: 2016-08-28
好东西,我的土币没人,
离线102013232

发帖
70
土币
6
威望
1
原创币
0
只看该作者 73楼 发表于: 2015-06-15
不错的程序!
离线crazynes

发帖
95
土币
9
威望
2
原创币
0
只看该作者 72楼 发表于: 2014-03-23
谢谢楼主分享
离线晴川

发帖
200
土币
478
威望
220
原创币
0
只看该作者 71楼 发表于: 2013-06-18
学习了 谢谢!
离线林中白狼

发帖
2839
土币
23410
威望
7
原创币
0
只看该作者 70楼 发表于: 2013-06-08
              
各位土友,多多看下哈!
快速回复
限100 字节
温馨提示:欢迎交流讨论,请勿纯表情、纯引用!
 
上一个 下一个

      浙公网安备 33010602003799号 浙ICP备14021682号-1

      工业和信息化部备案管理系统网站