怎么在截面上加弯矩???????
希望高手给出需要的命令模型命令流如下
是沿z轴的一圆柱壳，截面z=0全约束，在z=10（另一端）加弯矩
/prep7
et,1,solid45
MP,Ex,1,6.33e12
MP,prxy,1,0.3
MP,EX,2,0.021e12
MP,PRXY,2,0.3
k,1,1,,0
k,2,1.1,,,0
k,3,1.2,,0
k,4,1,,10
k,5,1.1,0,10
k,6,1.2,0,10
k,7,0,0,0
k,8,0,0,10
a,1,2,5,4
a,2,3,6,5
vrotat,all,,,,,,7,8,360,2 !面旋转生成体 vglue,all
FLST,5,2,6,ORDE,2
FITEM,5,2
FITEM,5,4
VSEL,S, , ,P51X
VATT, 2, , 1, 0 !!
ALLSEL,ALL
FLST,5,2,6,ORDE,2
FITEM,5,1
FITEM,5,3
VSEL,S, , ,P51X
VATT, 1, , 1, 0 !!
/PNUM,MAT,1
/REPLOT
lsel,s,loc,z,0
lsel,a,loc,z,10
lsel,u,loc,y,0
LESIZE,all,,9, , , , , ,1
allsel
LSEL,S,LOC,Z,1,10
LESIZE,all,1, , , , , , ,1
esize,1
VSWEEP,all !!!!!生成网格 论坛置顶有一篇帖子是讲加扭矩的，我想可以借鉴一下那个刚性区域的思想
http://forum.vibunion.com/forum/thread-61472-1-8.html 收到，谢谢
页:
[1]