声振论坛

 找回密码
 我要加入

QQ登录

只需一步,快速开始

查看: 1087|回复: 0

[结构分析] 关于索杆预应力桁架动力学分析

[复制链接]
发表于 2009-3-23 14:14 | 显示全部楼层 |阅读模式

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

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

x
要计算一桁架的固有频率,桁架主结构采用梁单元模拟,四个侧面是张力索,采用link10单元来模拟。
下面是命令流,大家帮忙分析一下,哪里有问题?
/BATCH  
/PREP7  
N,1,,,,,,,  
N,2,396,,,,,,   
N,3,396,396,,,,,
N,4,0,396,,,,,  
N,5,0,0,364.75,,,,  
N,6,0,396,364.75,,,,
N,6,396,0,364.75,,,,
N,7,396,396,364.75,,,,  
N,8,0,396,364.75,,,,
FLST,3,8,1,ORDE,2   
FITEM,3,1   
FITEM,3,-8  
KNODE,0,P51X
NPLOT   
FLST,2,8,1,ORDE,2   
FITEM,2,1   
FITEM,2,-8  
NDELE,P51X  
KPLOT   
LSTR,       1,       2  
LSTR,       2,       6  
LSTR,       6,       5  
LSTR,       5,       1  
LSTR,       4,       3  
LSTR,       3,       7  
LSTR,       7,       8  
LSTR,       8,       4  
LSTR,       1,       4  
LSTR,       2,       3  
LSTR,       6,       7  
LSTR,       5,       8  

LSTR,       5,       2  
LSTR,       1,       6  
LSTR,       6,       3  
LSTR,       2,       7  
LSTR,       8,       3  
LSTR,       4,       7  
LSTR,       8,       1  
LSTR,       4,       5  
!*  

!*  
ET,1,BEAM189
!*  
ET,2,LINK10
!*  
KEYOPT,2,2,0
KEYOPT,2,3,0
!*  
R,1,1.76625,1.415e-3,   
!*  
SECTYPE,   1, BEAM, CTUBE, sec1, 0  
SECOFFSET, CENT
SECDATA,7,8,0,0,0,0,0,0,0,0
SECPLOT,   1,0  
LPLOT   
FLST,5,20,4,ORDE,2  
FITEM,5,1   
FITEM,5,-20
CM,_Y,LINE  
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y   
!*  
LESIZE,_Y1, , ,10, , , , ,1
!*  
/UI,MESH,OFF
!*  
MPTEMP,,,,,,,,  
MPTEMP,1,0  
MPDATA,EX,1,,70e6   
MPDATA,PRXY,1,,0.33
MPTEMP,,,,,,,,  
MPTEMP,1,0  
MPDATA,DENS,1,,2.7e-6   
MPTEMP,,,,,,,,  
MPTEMP,1,0  
MPDATA,EX,2,,200e6  
MPDATA,PRXY,2,,0.3  
MPTEMP,,,,,,,,  
MPTEMP,1,0  
MPDATA,DENS,2,,7.8e-6   
TYPE,   1   
MAT,       1
REAL,       1   
ESYS,       0   
SECNUM,   1
!*  
FLST,2,12,4,ORDE,2  
FITEM,2,1   
FITEM,2,-12
LMESH,P51X  
TYPE,   2   
MAT,       2
REAL,       1   
ESYS,       0   
SECNUM,   1
!*  
FLST,2,8,4,ORDE,2   
FITEM,2,13  
FITEM,2,-20
LMESH,P51X  
FINISH  
/SOL
d,9,all
d,10,all
d,89,all
d,90,all
!*  
!*  
ANTYPE,0
PSTRES,1
/STATUS,SOLU
SOLVE   
!*  
FINISH  
/SOLUTION   
ANTYPE,2
!*  
!*  
MSAVE,0
!*  
MODOPT,LANB,10  
EQSLV,SPAR  
MXPAND,10, , ,0
LUMPM,0
PSTRES,1
!*  
MODOPT,LANB,10,0.01,1000, ,OFF  
/STATUS,SOLU
SOLVE   
FINISH
回复
分享到:

使用道具 举报

您需要登录后才可以回帖 登录 | 我要加入

本版积分规则

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

GMT+8, 2024-11-12 02:04 , Processed in 0.052419 second(s), 17 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

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