!EX3.17 球體及球面網格劃分
finish
/clear
/prep7
r0=10
sphere,,r0,,90
vsbw,all
vdele,2,,,1
esize,2
et,1,solid95
mshape,0,3d
mshkey,1
vmesh,all
vsymm,x,all
vsymm,y,all
vsymm,z,all
vglue,all
finish
/clear
/prep7
r0=10
sphere,,r0,,90
vsbw,all
vdele,2,,,1
vdele,all
asel,s,loc,x,0
asel,a,loc,y,0
asel,a,loc,z,0
adele,all,,,1
allsel
esize,2
et,1,shell63
mshape,0,2d
mshkey,1
amesh,all
arsym,x,all
arsym,y,all
arsym,z,all
nummrg,all