空心箱子压瘪的动力学

  /prep7
et,1,SHELL163
keyopt,1,1,10
r,1,5/6,5,2,2,2,2
mpmod,1,33
mp,ex,1,210.0
mp,nuxy,1,0.3

mp,dens,1,7.85e-6

tb,bkin,1
tbdat,1,0.23
tbdat,2,10
edmp,hgls,1,5
block,0,5,0,5,0,10
vdele,1
esize,0.5
amesh,all
EDCGEN,ASSC,' ',' ',0.1,0,0,0,0, , , , ,0,10000000,
finish
/solu
nsel,s,loc,z,0
d,all,ux,,,,,uy,uz,rotx,roty,rotz
nsel,s,loc,z,10
cm,push,node
alls
*DIM,time1,ARRAY,2,1,1, , ,
TIME1(2,1,1) = 2
*DIM,disp,ARRAY,2,1,1, , ,
DISP(2,1,1) = -5
EDLOAD,ADD,UZ,0,PUSH,TIME1,DISP
time,2
edres,100
edhtime,100
edint,5,0
solve
finish
/post1
set,last
plnsol,s,eqv
ANDATA,0.5, ,0,1,101,5,0,0  
finish