eex=2e11
pprxy=0.3
ff=1000
fe=0.3 !摩擦系数
fk=5 !接触刚度
fd=3 !切向接触刚度
/prep7
et,1,solid45
mp,ex,1,eex
mp,prxy,1,pprxy
MP,DENS,1,7.8e3
MP,MU,1,fe
block,0,1,0,1,0,1
block,0,1,0,1,1,2
lesize,all,0.1
vmesh,all
ET,2,170
ET,3,174
keyopt,3,10,2
R,2, , ,fk, , , ,
!RMORE, , , , , ,fd,
ASEL,S,,,2
NSLA,S,1
ESLN,S,0
r,1
TYPE,2
ESURF,ALL
allsel,all
ASEL,S,,,7
NSLA,S,1
ESLN,S,0
r,2,,,fk,
RMORE, , , , , ,fd
type,3
ESURF,ALL
allsel,all
save
fini
/SOLU
dk,1,ALL,0
dk,2,all,0
dk,3,all,0
dk,4,all,0
SFA,12,1,PRES,ff
sftran
ACEL,0,0,9.8, !施加重力加速度
nlgeom,on
auto,on
nsubst,100,500,50
outres,all,all
save
solve
fini |