!   new_sleeve_bore_code.mac
!
mod_assemb_prep
!
Dsb01=4.4265
Dsb02=3.875
Dsb03=3.687
Dsb04=3.100
Dsb05=2.376
!
Dsb06=2.326
Dsb07=1.940
Dsb08=2.166
!
Dsbz01=0.600
Dsbz02=0.682
Dsbz03=0.894
Dsbz04=1.003
Dsbz05=1.103
!
Dsbz06=1.587
Dsbz07=1.816
Dsbz08=1.909
Dsbz09=2.875
!
csys,0
!
k,,0,0,-Dsbz09
k,,0,0,0
k,,Dsb01/2,0,0
k,,Dsb01/2,0,-Dsbz01
k,,Dsb03/2,0,-Dsbz01
!
k,,Dsb04/2,0,-Dsbz03
k,,Dsb04/2,0,-Dsbz04
k,,Dsb05/2,0,-Dsbz04
k,,Dsb05/2,0,-Dsbz06
k,,Dsb06/2,0,-Dsbz06
!
k,,Dsb06/2,0,-Dsbz07
k,,Dsb07/2,0,-Dsbz07
k,,Dsb07/2,0,-Dsbz08
k,,Dsb08/2,0,-Dsbz08
k,,Dsb08/2,0,-Dsbz09
!
!
create_area
!
revolve_aset,0,360,2
!
lplot
!