׮׮˳Ӵ
finish
/clear
/prep7
apile=1.0 !׮ƽߴ
hpil1=2.0 !׮ϸ߶
hpil2=8.0 !׮
asoil=7.0 !ƽߴ
hsoil=24.0 !

et,1,solid45
et,2,170
et,3,173
keyopt,3,9,0
keyopt,3,12,2

mp,ex,1,2.6e10  !׮Ĳ
mp,prxy,1,0.167
mp,dens,1,2500

mp,ex,2,2.6e8   !
mp,prxy,2,0.42
mp,dens,2,1900
tb,dp,2
tbdata,,19000,31,29

mp,mu,3,0.2 !Ħϵ

r,1
r,2
r,3
!1/4ģ
blc4,,,asoil,asoil,-hsoil !
blc4,,,1,1,-hpil2
vsbv,1,2
wpoff,apile
wprota,,,90 
vsbw,all
wpoff,,apile
wprota,,90  
vsbw,all
wpcsys,-1
wpoff,,,-hpil2
vsbw,all
numcmp,all
vatt,2,2,1
esize,0.5
mshkey,1
vmesh,all

vsel,none !׮
blc4,,,apile,apile,hpil1+hpil2
vatt,1,1,1
vmesh,all
!Ӵ(Ϊ򻯣Ų)
asel,s,,,37,39,2
asel,a,,,34
nsla,s,1
real,3
type,2
mat,3
esurf,all
allsel,all

asel,s,,,6,10,2
nsla,s,1
real,3
type,3
esurf,all





allsel,all
asel,s,loc,x,0
asel,a,loc,y,0
da,all,symm

asel,s,loc,x,asoil
asel,a,loc,y,asoil
da,all,all

asel,s,loc,z,-hsoil
da,all,uz
allsel,all



/solu
antype,static
alls
fcum,add,,
acel,,,9.8 
deltim,0.2,0.05,0.4 
autots,on !ʹԶʱ䲽 
pred,on !ʱ䲽Ԥ 
!lnsrch,on ! 
nlgeom,on !򿪴λЧ 
nropt,full,,on !趨ţ-ɭѡ 
KBC,0               !Ӻ
TIME,1 
OUTRES,basic,1  !ѡƣÿһӲrescontrol,,all,1,100
cnvtol,f,,0.02,2,1
solve
save
rescontrol,file_summany

/solu
antype,,rest,1,5
asel,s,loc,z,hpil1
sfa,all,1,pres,50e4
allsel,all
TIME,2
deltim,0.2,0.05,0.4  
autots,on !ʹԶʱ䲽 
pred,on !ʱ䲽Ԥ 
lnsrch,on ! 
nlgeom,on !򿪴λЧ 
nropt,full !趨ţ-ɭѡ 
cutcontrol,plslimit,0.20
KBC,0               !Ӻ
cnvtol,f,,0.02,2,1 
!cnvtol,f,,0.7,2
!NSUBST,30
OUTRES,basic,1   
solve 
save
rescontrol,file_summany







/post1
set,last
/view,1,1,1,1
/ang,1
/ang,1,-180,xs,1
/ang,1,-60,zs,1
esel,s,real,,1
plnsol,u,z
plnsol,s,z

esel,s,real,,2
plnsol,u,z
plnsol,s,eqv
plnsol,eppl,z

esel,s,type,,3 !Ӵ״̬
etable,st1,nmisc,41
pletab,st1
etable,cz1,nmisc,45
pletab,cz1
!------------
esel,s,real,,2
path,p1,2
ppath,1,,0,0,-hpil2
ppath,2,,0,0,-hsoil
pdef,sz,s,z
plpath,sz

pdef,sx,s,x
plpath,sx

pdef,uz,u,z
plpath,uz

path,p2,2
ppath,1,,0,0,-7
ppath,2,,asoil,0,-7
pdef,sz,s,z
plpath,sz

pdef,uz,u,z
plpath,uz



/POST1
LCDEF,1,1, ,          !1㲽Ϊ1
LCDEF,2,2, ,          !6㲽(ͶΪ100%)Ϊع2
LCASE,2,             !ع2
LCOPER,SUB,1, , ,     !ع2ȥع1
     plnsol,u,z
     
     esel,s,real,,2
path,p1,2
ppath,1,,0,0,-hpil2
ppath,2,,0,0,-hsoil
pdef,uz,u,z
plpath,uz

path,p2,2
ppath,1,,0,0,-7
ppath,2,,asoil,0,-7
pdef,uz,u,z
plpath,uz