finish$/clear
/prep7
ET,1,SHELL99,,,,,2,4
KEYOPT,1,8,1
R,1,8,1
RMODIF,1,13,1,0,0.125,1,45,0.125
RMODIF,1,19,1,-45,0.125,1,90,0.125
MP,EX,1,135000
MP,EY,1,8000
MP,EZ,1,8000
MP,PRXY,1,0.34
MP,PRYZ,1,0.34
MP,PRXZ,1,0.34
MP,GXY,1,4500
MP,GYZ,1,3700
MP,GXZ,1,4500
rectng,0,45,0,12.5
!定义网格划分
LSEL,S,LENGTH,,45
LESIZE,all, , ,5, , , , ,1
lsel,s,length,,12.5
lesize,all, , ,10,1, , , ,1
!映射划分层合板
MSHAPE,0,3D
MSHKEY,1
AMESH,all
!定义约束
/solu
nsel,s,loc,x,0
D,ALL, , , , , ,UX
nsel,s,loc,y,0
D,ALL, , , , , ,UY
allsel,all
!施加拉伸载荷
lsel,s,loc,x,45
SFL,ALL,PRES,-100,
allsel,all
/solu
NSUBST,10,0,0
OUTRES,ERASE
OUTRES,ALL,1
solve
我将你的命令流改成下面的形式就可以算了!把你的模型等效成1/4模型! |