在下面一段命令后,想在中间1/4圆柱部分的面(A6~A60,间隔6)上产生一层shell63的面元,如何操作,谢谢!
/prep7
et,1,42
et,2,63
et,3,30
L_outer=2.52/2
R_outer=0.7205
H_outer=0.0012
H_aair =0.01
L_aair =L_outer+2*H_aair
R_aair =R_outer+H_aair
R_oair =5
k,1, 0 ,0 ,0
k,2,-L_aair,0 ,0
k,3, L_aair,0 ,0
k,4,-L_aair,R_aair,0
k,5, L_aair,R_aair,0
k,6,-L_outer,0 ,0
k,7, L_outer,0 ,0
k,8,-L_outer,R_outer,0
k,9, L_outer,R_outer,0
circle,1,R_oair,,,180 !L1,2
l,12,2 !L3~L12
l,2,4
l,4,5
l,5,3
l,3,10
l,2,6
l,6,8
l,8,9
l,9,7
l,7,3
al,1,2,3,4,5,6,7
al,8,9,10,11,12,6,5,4
lsel,s,,,4,6
lesize,all,,,10
lesize,5 ,,,30
lsel,s,,,5,4
lccat,all !L13??
lsel,s,,,1,2
lccat,all !L14??
lesize,all,,,25
lsel,s,,,3,7
lesize,all,,,45
mshkey,1
amesh,1
lsel,s,,,13
ldele,all
lsel,s,,,14
ldele,all
TYPE,3
EXTOPT,ESIZE,10,0,
EXTOPT,ACLEAR,0
FLST,2,1,5,ORDE,1
FITEM,2,1
FLST,8,2,3
FITEM,8,2
FITEM,8,3
VROTAT,P51X, , , , , ,P51X, ,90,10, |