!   new_gimbal_bore_code.mac
!
mod_assemb_prep
!
Dgb01=4.4263
Dgb02=4.088
Dgb03=3.231
Dgb04=2.6715
!
Dgbz01=0.711
Dgbz02=1.122
Dgbz03=2.815
!
Dc01=0.070
R01=0.075
R02=0.050
!
csys,0
!
k,,0,0,-Dgbz03
k,,0,0,0
k,,Dgb01/2,0,0
k,,Dgb01/2,0,-Dgbz01
k,,Dgb02/2,0,-Dgbz01
!
k,,Dgb03/2,0,-Dgbz02
k,,Dgb04/2,0,-Dgbz02
k,,Dgb04/2,0,-Dgbz03
!
create_lines
!
chamfer_area,1,lm-2,lm-1,Dc01
!
ln_fillet,km-6,R01
ln_fillet,km-6,R02
!
create_area-lines
!
revolve_aset,0,360,2
!
lplot
!