功能:调用WAMIT计算的附加质量、Hydrostatic stiffness,加上系统的质量矩阵和刚度矩阵进行特征值计算,得出系统运动特征模态和自然周期。
发起人、负责人:wavesurfer
贡献人:
开发语言、工具:FORTAN
版本号:V0.0
项目详细介绍:Mode analysis 是标准的动力分析手段,可以对系统的运动特性有很好把握。这个简单程序实现了这一功能。一点基本概念:
http://forum.petro-c...?showtopic=6347
注:这个程序调用了计算矩阵特征值的数值程序库,如果你的FORTRAN版本不同,请对以下几行作相应修改。
include 'link_f90_dll.h'
USE IMSL_LIBRARIES
CALL DLINRG (6*nb, Mass, 6*nb, Mass, 6*nb)
CALL DEVCRG (6*nb, matmul(GlobalK,Mass), 6*nb, eigValue, eigVector, 6*nb)
程序仅提供给大家学习讨论,请勿用于正式项目。如果您自己有类似程序或对这个程序进行了改进,请发上来与大家共同探讨。
附加文件
-
EigenValue.f90 (6.5K)
下载次数: 25

登录
注册
帮助

多重回复