tests/bugs/modalg/bug23367_9

   1 puts "============"
   2 puts "CR23367"
   3 puts "============"
   4 puts ""
   5 ##########################################################################################################
   6 # New functionality restoring the middle path of pipe-like shape
   7 ##########################################################################################################
   8
   9 ptorus a 50 10 0 180
  10 explode a f
  11 shape b Sh
  12 add a_1 b
  13 explode b e
  14 wire ww b_2
  15 donly b ww
  16 fit
  17 middlepath result b ww ww
  18
  19 set length 1.
  20
  21 set 2dviewer 1
  22
  23
  24
  25