声振论坛

 找回密码
 我要加入

QQ登录

只需一步,快速开始

查看: 6907|回复: 16

[Fortran] 自己的一个Fortran计算框架的程序,内有例题若干,打开即可计算。

[复制链接]
发表于 2007-5-29 02:01 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?我要加入

x
大家好,我是这个论坛的一个新手,最近学习需要在编写一个框架计算的程序
我用的是刚度矩阵法,对2维框架进行静力与动力计算。
我开始用Fortran编写,后来发现Tcl/Tk语言可以有效地进行与exe文件的交流,就用Tcl编写了界面,然后计算部分用Fortran调用Lapack链接库。

解释:
现在可以进行的计算有集中力,均布力,温度,制作沉降。
动力计算,现在只能看振型,进一步的计算还在考虑当中。
由于Tcl/Tk对中文支持不够好,命令解释都是用英文,个人英语一般,还望包涵。
程序加工当中,现在还不能修改,编辑,只能保存,打开。
软件功能并不复杂,只要有点力学基础,就应该可以操作了。


由于时间仓促,我应经加工了2个月,打算再花2个月的时间将其进行进一步优化。
现在想把这个程序公布出来,是希望有兴趣的朋友可以下载来试试,有任何想法,欢迎写信给我。
Email在运行的时候按F1就可以看到了,恕我不再这里公布了。

好的建议,我一定会考虑接纳,我会非常感激的。就当抛砖引玉了,呵呵。


下载地址:http://zhousicheng.googlepages.com/a_039
程序测试:http://zhousicheng.googlepages.com/a_044

更新下载地址:
[本地下载]  http://zhousicheng.googlepages.com/SD2007.rar
[我的MoFile] http://my.mofile.com/sicheng6699

[ 本帖最后由 风花雪月 于 2007-6-4 11:52 编辑 ]

评分

1

查看全部评分

回复
分享到:

使用道具 举报

发表于 2007-5-29 09:02 | 显示全部楼层
不错!支持!
发表于 2007-5-29 09:23 | 显示全部楼层
能不能分析静不定问题?
发表于 2007-5-29 13:25 | 显示全部楼层

回复 #1 sicheng6699 的帖子

Good job!

采用tcl/tk写界面是不是具有什么优势啊?对这个不了解,不过很感兴趣。 :)
 楼主| 发表于 2007-5-29 23:28 | 显示全部楼层
Tcl语言在这里有介绍:
http://www.tclchina.com/  Tcl/Tk中文网
比如写一个按钮:
button .b -text "Hallo World!"
pack .b
就生成了一个按钮

                               
登录/注册后可看大图



跟Fortran生成的exe文件交流也很方便,一句话建立一个通道就好了,具体的语句就不再这里写了。
谢谢大家赏脸,我发这个贴的一个目的就是请大家看看,有什么不足的地方,任何小的问题,还请指教。
 楼主| 发表于 2007-5-29 23:31 | 显示全部楼层
静不定问题?是指超静定结构么?
刚度矩阵法解决的就是稳定结构的,不管有没有多于约束,从悬臂梁到刚架,都可以的。
 楼主| 发表于 2007-5-30 07:32 | 显示全部楼层
--------------------------------------------------------------------------------
更新:添加了删除功能,通过输入相应的节点,或者单元编号
可以删除节点,单元,材料,支座,集中力,均布力,温度作用,支座沉降等等
发表于 2007-5-30 16:26 | 显示全部楼层
原帖由 sicheng6699 于 2007-5-29 23:31 发表
静不定问题?是指超静定结构么?
刚度矩阵法解决的就是稳定结构的,不管有没有多于约束,从悬臂梁到刚架,都可以的。

[ 本帖最后由 风花雪月 于 2007-5-31 09:12 编辑 ]
发表于 2007-5-30 16:27 | 显示全部楼层
一个简单的例子
image008.gif
 楼主| 发表于 2007-5-30 21:02 | 显示全部楼层
你给的例子好像是个1次超静定结构,不知道理解的对不对
不过我刚才试了一下,位移图:

                               
登录/注册后可看大图
发表于 2007-5-31 09:13 | 显示全部楼层
原帖由 sicheng6699 于 2007-5-30 21:02 发表
你给的例子好像是个1次超静定结构,不知道理解的对不对
不过我刚才试了一下,位移图:
http://sicheng6699.googlepages.com/2007.05.31.test.jpg


是这样的,可能对这个概念我理解有点问题
 楼主| 发表于 2007-5-31 18:59 | 显示全部楼层
先写一个简介,方便需要的朋友适用,因为里面的结构可能不是很清晰。


简单介绍:
定义节点(需要输入:X,Y)
定义材料(需要输入:面积A,弹性模量E,惯性矩I)
通过节点,和材料,可以定义单元 (需要输入:两端节点,材料属性)
定义约束情况(需要输入:所在节点,约束类型)
集中荷载(需要输入:作用单元,方向,大小)
均布荷载(需要输入:作用单元,方向,大小)
温度效应(需要输入:作用单元,截面高度h,温度影响系数,alf_T,单元两侧的温度大小Tu,To)
支座沉降(需要输入:作用节点,沉降方向,大小)

定义好之后,就可以进行静力计算,察看弯矩图M,轴力图N,剪力图Q,位移图D。
动力分析部分,还在修改中,目前可以通过输入均布质量(对于每一种材料来说),定义频率最小的几个振型,得到相应的动态图。
另外还添加了打印功能,保存为PS文件,可以通过Photoshop转换为600分辨率高清晰结构图。
 楼主| 发表于 2007-6-2 17:16 | 显示全部楼层
更新下载地址:
[本地下载]  http://zhousicheng.googlepages.com/SD2007.rar
[我的MoFile] http://my.mofile.com/sicheng6699
发表于 2008-6-8 00:14 | 显示全部楼层
楼主!你好
你用Fortran计算框架的程序 3维框架进行静力与动力计算有研究吗!  我现在想在这方面做点工作!

希望能给我点帮助!我的QQ  398713901
发表于 2008-6-15 09:57 | 显示全部楼层
兄弟,下载不了啊!是不是搞错了?
您需要登录后才可以回帖 登录 | 我要加入

本版积分规则

QQ|小黑屋|Archiver|手机版|联系我们|声振论坛

GMT+8, 2024-12-23 15:53 , Processed in 0.071013 second(s), 23 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表