如何在垫板和筒体间建立焊缝!!!!!!!!!急需
浏览:185039
FINISH
/CLEAR
/FILN,anlysis of connect of con
/title,con
/units,si
*set,dc,2650 ! 筒体内径
*set,tc,14 ! 筒体壁厚
*set,h,2000 ! 筒体高度
*set,d,2650 ! 椭圆封头内径
*set,t1,14 ! 椭圆封头厚度
*set,h0,40 ! 椭圆封头的直边高度
*set,h1,662 ! 椭圆封头的曲面高度
*set,b1,550 ! 垫板长度
*set,b2,400 ! 垫板宽度
*set,t2,8 ! 垫板厚度
*set,r1,50 ! 垫板四周倒圆角半径
*set,d2,114 ! 支撑板直径
*set,t3,10 ! 支撑板厚度
*set,h3,1332 ! 支撑板高度
*set,pc,1.26 ! 设计压力
*set,t,-196 ! 设计温度
*set,h2,100 ! 垫板距椭圆封头直边高度
/prep7
et,1,solid45
mp,ex,1,2.1e5
mp,nuxy,1,0.29
mp,dens,1,7.93e-9
!首先创建椭圆封头
k,1,,,,
circle,1,1
lsscale,1,4,1,d/2+t1,h1+t1,,,1
lsscale,1,4,1,d/2,h1,,,1
ldele,1,,,1
ldele,2,,,1
ldele,3,,,1
ldele,4,,,1
ldele,5,,,1
ldele,6,,,1
ldele,7,,,1
ldele,9,,,1
ldele,10,,,1
ldele,11,,,1
l,9,13
l,6,10
al,1,2,8,12
vrotat,1,,,,,,1,13,180
kdele,1
k,1,d/2,h0
k,7,d/2+t1,h0
l,6,7
l,7,1
l,1,10
al,2,15,16,17
vdrag,10,,,,,,6
vdele,2,,,1
k,4,d/2,h0+h
k,5,d/2+tc,h0+h
l,7,5
l,5,4
l,4,1
al,9,10,11,16
vdrag,6,,,,,,22
NUMMRG,ALL, , , ,LOW !合并
NUMCMP,ALL !压缩
wpoffs,0,h0+h2
blc4,dc/2+tc,,t2,b1
vdrag,16,,,,,,14
wprota,0,0,-36.44
vsbw,4
wprota,0,0,-17.12
vsbw,6
vdele,4,,,1
vdele,5,,,1
wprota,0,0,8.56
wpoffs,dc/2+tc+t2+d2/2
wprota,0,90
cylind,d2/2-t3,d2/2,-1000,1000,0,360
wpstyl,defa
vgen,2,1,,,600,,,,,0
vovlap,4,5
vdele,10,,,1
vdele,11,,,1
vdele,6,,,1
vdele,8,,,1
kwpave,51
wprota,0,90
wpoffs,0,0,-h3
vsbw,9
vdele,5,,,1
kwpave,30
vsbw,4
kwpave,27
vsbw,6
wpstyl,defa
/CLEAR
/FILN,anlysis of connect of con
/title,con
/units,si
*set,dc,2650 ! 筒体内径
*set,tc,14 ! 筒体壁厚
*set,h,2000 ! 筒体高度
*set,d,2650 ! 椭圆封头内径
*set,t1,14 ! 椭圆封头厚度
*set,h0,40 ! 椭圆封头的直边高度
*set,h1,662 ! 椭圆封头的曲面高度
*set,b1,550 ! 垫板长度
*set,b2,400 ! 垫板宽度
*set,t2,8 ! 垫板厚度
*set,r1,50 ! 垫板四周倒圆角半径
*set,d2,114 ! 支撑板直径
*set,t3,10 ! 支撑板厚度
*set,h3,1332 ! 支撑板高度
*set,pc,1.26 ! 设计压力
*set,t,-196 ! 设计温度
*set,h2,100 ! 垫板距椭圆封头直边高度
/prep7
et,1,solid45
mp,ex,1,2.1e5
mp,nuxy,1,0.29
mp,dens,1,7.93e-9
!首先创建椭圆封头
k,1,,,,
circle,1,1
lsscale,1,4,1,d/2+t1,h1+t1,,,1
lsscale,1,4,1,d/2,h1,,,1
ldele,1,,,1
ldele,2,,,1
ldele,3,,,1
ldele,4,,,1
ldele,5,,,1
ldele,6,,,1
ldele,7,,,1
ldele,9,,,1
ldele,10,,,1
ldele,11,,,1
l,9,13
l,6,10
al,1,2,8,12
vrotat,1,,,,,,1,13,180
kdele,1
k,1,d/2,h0
k,7,d/2+t1,h0
l,6,7
l,7,1
l,1,10
al,2,15,16,17
vdrag,10,,,,,,6
vdele,2,,,1
k,4,d/2,h0+h
k,5,d/2+tc,h0+h
l,7,5
l,5,4
l,4,1
al,9,10,11,16
vdrag,6,,,,,,22
NUMMRG,ALL, , , ,LOW !合并
NUMCMP,ALL !压缩
wpoffs,0,h0+h2
blc4,dc/2+tc,,t2,b1
vdrag,16,,,,,,14
wprota,0,0,-36.44
vsbw,4
wprota,0,0,-17.12
vsbw,6
vdele,4,,,1
vdele,5,,,1
wprota,0,0,8.56
wpoffs,dc/2+tc+t2+d2/2
wprota,0,90
cylind,d2/2-t3,d2/2,-1000,1000,0,360
wpstyl,defa
vgen,2,1,,,600,,,,,0
vovlap,4,5
vdele,10,,,1
vdele,11,,,1
vdele,6,,,1
vdele,8,,,1
kwpave,51
wprota,0,90
wpoffs,0,0,-h3
vsbw,9
vdele,5,,,1
kwpave,30
vsbw,4
kwpave,27
vsbw,6
wpstyl,defa