一个很简单的结构力学

1987lee

本人写了一个很简单的结构力学，求解时老出现约束不够的警告，求大家找一找错误

/prep7
et,1,beam3
mp,ex,1,2,1e11
mp,prxy,1,0.2
r,1,0.01,1.2e-4,0.2
r,2,0.01,1.8e-4,0.2
r,3,0.01,0.6e-4,0.2
r,4,0.01,0.8e-4,0.2
r,5,0.01,6e-4,0.2
k,1,0,0 $k,2,0,6
k,3,0,12 $k,4,4
k,5,4,6 $k,6,4,12
k,7,8,0 $k,8,8,6
l,1,2 $l,2,3
l,4,5 $l,5,6
l,7,8 $l,3,6
l,2,5 $l,5,8

lsel,s,,,1,3,2
latt,1,1,1
lesize,1,,,6
lesize,3,,,6

lsel,s,,,5
latt,1,2,1
lesize,5,,,6

lsel,s,,,2,4,2
latt,1,3,1
lesize,2,,,6
lesize,4,,,6

lsel,s,,,6
latt,1,4,1
lesize,6,,,4

lsel,s,,,7,8
latt,1,5,1
lesize,7,,,4
lesize,8,,,4
allsel,all
lmesh,all
dk,1,all
dk,4,all
dk,7,all
finish

/solu

*do,i,1,12,
sfbeam,i,1,pres,500,500
*enddo
allsel
solve

1987lee

过了几天怎么还有人回我的贴呀！？？:@Q