3楼
请看我编写的这个结构力学例子:
通过耦合命令cp实现铰接。
/prep7
mp,ex,1,3e10
mp,prxy,1,0.3
mp,dens,1,2500
et,1,beam3
r,1,0.5,0.5,0.5**3/12
k,1,0,0
k,2,-2,-4
k,3,-2,0
k,4,-2,2
k,5,-4,0
k,6,-4,0
k,7,-10,0
l,1,3
l,2,3
l,3,4
l,3,5
l,6,7
Lesize,all,0.5
lmesh,all
cp,1,ux,18,22 !此处即实现铰接。
cp,2,uy,18,22
/solu
fk,4,fx,20
*do,i,21,32
sfbeam,i,,pres,-10
*enddo
dk,1,uy,0
dk,2,ux,0
dk,2,uy,0
d,31,uy,0
solve
回复