/prep7
et,1,plane42
et,2,solid45
mp,ex,1,2.5e10
mp,nuxy,1,0.2
mp,dens,1,2500
mp,ex,2,2.5e8
mp,nuxy,2,0.4
mp,dens,2,2000
tb,dp,2
tbdata,1,19,32,30
rectng,0,1,0,8,
rectng,1,5,0,6,
rectng,0,5,0,-16
asel,s,,,2,3,1
aglue,all
numcmp,all
alls
aplot
lsel,s,,,1,3,2
lesize,all,,,2
lsel,s,,2,4,2
lsel,s,,,2,4,2
lesize,all,,,16
amesh,1
lsel,s,,,6,8,2
lesize,all,0.5
lsel,s,,,5
lesize,all,0.5
lsel,s,,,7
lesize,all,0.5
amesh,2
lsel,s,,,11
lesize,all,0.5
lsel,s,,,12
lesize,all,0.5
lsel,s,,,10
lesize,all,0.5
lsel,s,,,9
lesize,all,0.5
amesh,all
extopt,esize,2,0,
extopt,aclear,1
type,2
mat,1
vext,1,,,,,-1
extopt,esize,2,0
extopt,aclear,1
mat,2
vext,2,3,1,,,-1
alls
/view,1,1,1,1
eplor
k,1001,5,6,-5
k,1002,5,0,-5
k,1003,5,-16,-5
l,18,1001
l,1001,1002
l,1002,17
l,1002,1003
l,1003,21
al,22,36,37,38
al,30,38,39,40
vext,19,20,1,-5
vplot
vsel,s,,,4,5
vlpot
vplot
lsel,s,,,36,52
lesize,all,0.5
lplot
type,2
mat,2
vmesh,all
vsel,s,,,2,5
vplot
eslv,s
nslv,s,1
eplot
nummrg,all
numcmp,all
alls
/pnum,area,1
/view,1,1,1,1
/ang,1
/pnum,mat,1,2
eplot
alls
et,3,170
et,4,173
keyopt,4,9,0
keyopt,4,12,2
r,10
real,10
mp,mu,2,0.2
vsel,s,,,1
vplot
asel,s,,,4,6,1
aplot
cm,target,area
type,3
nsla,s,1
esurf,all
eplot
esel,s,type,,3
eplot
/psymb,esys,1
alls
vsel,s,,,2,5
vplot
asel,s,,,13
asel,a,,,17
asel,a,,,22
aplot
cm,contact,area
type,4
nsla,s,1
esurf,all
esel,s,type,,4
eplot
/psymb,esys,1
alls
gplot
finish
/solu
asel,s,loc,x,0
aplot
da,all,symm
asel,s,loc,x,5
da,all,all
aplot
asel,s,loc,z,-5
da,all,all
asel,s,loc,y,-16
da,all,all
alls
acel,0,9.8.0
acel,0,9.8,0
nsel,s,loc,y,8
esln,s
eplot
sfe,all,3,pres,,500
antype,static
nlgeom,on]
nlgeom,on
time,1
nsub,100
outres,all,all
alls
solv
finish |
IP卡
狗仔卡
发表于 2007-8-11 21:05:04
提升卡
沉默卡
喧嚣卡
变色卡
抢沙发
千斤顶
显身卡
没人顶自己顶
