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 set square 2343.46
  27
  28 set nb_v_good 8
  29 set nb_e_good 12
  30 set nb_w_good 6
  31 set nb_f_good 6
  32 set nb_sh_good 1
  33 set nb_sol_good 1
  34 set nb_compsol_good 0
  35 set nb_compound_good 0
  36 set nb_shape_good 34
  37
  38 set 2dviewer 1