tests/bugs/modalg_5/bug24532

   1 puts "============"
   2 puts "OCC24532"
   3 puts "============"
   4 puts ""
   5 #######################################################################
   6 # BRepOffsetAPI_MakePipeShell raises an exception in a case with auxiliary guide
   7 #######################################################################
   8
   9 polyline w1 -4 -3 0 4 -3 0 4 3 0 -4 3 0 -4 -3 0
  10 polyline w2 4 3 80 -4 3 80 -4 -3 80 4 -3 80 4 3 80
  11 polyline sp 0 0 0 0 0 80
  12
  13 cylinder cc 0 0 0 0 0 1 -4 -3 0 5
  14 line ll 0 0 pi 80
  15 trim ll ll 0 sqrt(pi*pi+80*80)
  16 explode w1 v
  17 explode w2 v
  18 mkedge ee ll cc w1_1 w2_1
  19 wire gg ee
  20
  21 mksweep sp
  22 setsweep -G gg 0 0
  23 addsweep w1
  24 buildsweep result -S
  25
  26 checkprops result -s 2343.46
  27 checkshape result
  28
  29 checknbshapes result -vertex 8 -edge 12 -wire 6 -face 6 -shell 1 -solid 1 -compsolid 0 -compound 0 -shape 34
  30 checkview -display result -2d -path ${imagedir}/${test_image}.png