土木在线论坛 \ 建筑结构 \ ANSYS \ 帮我看看这个框架时程分析命令流

帮我看看这个框架时程分析命令流

发布于:2006-12-29 08:38:29 来自:建筑结构/ANSYS [复制转发]
我用的9.0的,大家帮我看看命令的正确与否,尤其是最后画的弯矩图对吗?谢谢。
fini
/clear
/filname,kuanjiashicheng
/prep7
a=1000


et,1,23

r,1,0.49,0.020008,0.7
r,2,0.36,0.0108,0.6
r,3,0.3025,0.007626,0.55
r,4,0.175,0.003646,0.5
r,5,0.14,0.001867,0.4
r,6,0.15,0.003125,0.5
r,7,0.12,0.0016,0.4

mp,ex,1,40330e6
mp,nuxy,1,0.31
mp,dens,1,2.414e3
mp,dmpr,1,0.68
tb,MELAS,1,,10
tbpt,,0,0
tbpt,,0.000147,5e6
tbpt,,0.000298,10e6
tbpt,,0.000434,15e6
tbpt,,0.000558,20e6
tbpt,,0.000747,25e6
tbpt,,0.00099,30e6
tbpt,,0.0014,35.5e6
tbpt,,0.00185,38e6
tbpt,,0.00215,35e6

mp,ex,2,22730e6
mp,nuxy,2,0.21
mp,dens,2,2.173e3
mp,dmpr,2,2.42
tb,MELAS,2,,12
tbpt,,0,0
tbpt,,0.00022,5e6
tbpt,,0.00044,10e6
tbpt,,0.00075,15e6
tbpt,,0.00099,19.3e6
tbpt,,0.00142,25e6
tbpt,,0.00183,28e6
tbpt,,0.00225,29.5e6
tbpt,,0.0028,30e6
tbpt,,0.0033,23.5e6
tbpt,,0.0038,17e6
tbpt,,0.00443,12e6

k,1,0,0
k,2,0,5.1
kgen,7,2,,,,3.3,,1
*do,i,1,7,1
l,i,i+1
*enddo
lgen,2,1,7,,5.4
lgen,2,8,14,,2.4
lgen,2,15,21,,5.4
kgen,2,24,32,8,,3,,9
l,24,33
l,32,41
*do,i,2,8,1
l,i,i+8
*enddo
*do,i,10,16,1
l,i,i+8
*enddo
*do,i,18,24,1
l,i,i+8
*enddo
l,33,41


lsel,s,line,,1,22,7
lesize,all,,,10
latt,1,1,1
lmesh,all

lsel,s,line,,2,4,1
lsel,a,line,,9,11,1
lsel,a,line,,16,18,1
lsel,a,line,,23,25,1
lesize,all,,,10
latt,1,2,1
lmesh,all

lsel,s,line,,5,7,1
lsel,a,line,,12,14,1
lsel,a,line,,19,21,1
lsel,a,line,,26,30,1
lesize,all,,,10
latt,1,3,1
lmesh,all

lsel,s,line,,31,45,14
lesize,all,,,10
latt,2,4,1
lmesh,all

lsel,s,line,,38
lesize,all,,,10
latt,2,5,1
lmesh,all

lsel,s,line,,32,37,1
lsel,a,line,,46,52,1
lesize,all,,,10
latt,2,6,1
lmesh,all

lsel,s,line,,39,44,1
lesize,all,,,10
latt,2,7,1
lmesh,all

nsel,s,node,,1,34,11
d,all,all


*dim,ftem,ARRAY,a,1,1,,,
*creat,ff
*vread,ftem,’rengong’,’txt’,’E:\’,1,,,,,0,
(f15.13)
*end
/input,ff
fini
/config,nres,5000

/SOL
ANTYPE,4
allsel
TRNOPT,FULL
TIMINT,OFF
TIME,1e-8
NSUBST,2
KBC,1
ACEL,0,-9.8
solve

/solu
antype,trans
trnopt,full
OUTRES,ALL,ALL
timint,on
kbc,0
nlgeom,on
*do,i,1,a,1
time,i*0.01
allsel
acel,ftem(i)*0.01
solve
*enddo

/POST1
allsel
SET,,,1,,5.47
ETABLE,MI,SMISC,6
ETABLE,MJ,SMISC,12
PLLS,MI,MJ
这个家伙什么也没有留下。。。

ANSYS

返回版块

4.4 万条内容 · 142 人订阅

猜你喜欢

阅读下一篇

ANSYS平台下电站材料粘塑性模型的研究及开发

硕士学位论文“ANSYS平台下电站材料粘塑性模型的研究及开发”

回帖成功

经验值 +10