📄 e6.35.txt
字号:
!EX6.35 壳与3D实体的刚性连接
finish
/clear
/prep7
h=2.4
b=2.0
l1=1.8
l2=3.0
t=0.3
q1=10000
q2=50000
et,1,solid95
et,2,shell93
mp,ex,1,3.0e10
mp,prxy,1,0.2
r,1,t
blc4,,,b,h,l1
wpoff,,h-t/2,l1
wprota,,90
vsbw,all
blc4,,,b,l2
nummrg,all
vatt,1,,1
esize,t/2
vmesh,all
asel,s,loc,z,l1+t,l1+l2
aatt,1,1,2
amesh,all
sfa,all,1,pres,q1
lsla,s
lsel,r,loc,x,b
sfl,all,pres,q2*t
asel,s,loc,y,0
da,all,all
allsel,all
nsel,s,loc,z,l1
nsel,r,loc,y,h-t,h
cm,nodcm,node
*do,i,1,29
cmsel,s,nodcm
nsel,r,loc,x,nx(i)
cerig,i,all,ux,uz
*enddo
allsel,all
/solu
solve
/post1
pldisp,1
!------------------------
!实体模型
finish
/clear
/prep7
h=2.4
b=2.0
l1=1.8
l2=3.0
t=0.3
q1=10000
q2=50000
et,1,solid95
mp,ex,1,3.0e10
mp,prxy,1,0.2
blc4,,,b,h,l1
blc4,,h-t,b,t,l1+l2
vovlap,all
esize,0.2
vmesh,all
asel,s,loc,y,0
da,all,all
asel,s,loc,y,h
asel,r,loc,z,l1,l1+l2
sfa,all,1,pres,q1
asel,s,loc,x,b
asel,r,loc,z,l1,l1+l2
sfa,all,1,pres,q2
allsel,all
/solu
solve
/post1
pldisp,1
/show,jpeg
plnsol,s,1
plnsol,s,3
plnsol,s,z
pldisp
/show,close
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -