tests/bugs/modalg_5/bug23375_1

   1 puts "========================"
   2 puts "OCC23375"
   3 puts "========================"
   4 puts ""
   5 #######################################################################
   6 # (OCC 6.5.3 regression) BRepBuilderAPI_Sewing returns wrong result
   7 #######################################################################
   8
   9 restore [locate_data_file bug23375_Pump1.brep] p
  10
  11 sewing result 0.1 p
  12
  13 checkshape result
  14
  15 set whatis_result [whatis result]
  16
  17 if { [regexp {SHELL} ${whatis_result}] != 1 } {
  18   puts "Error: invalid result shape; SHELL"
  19 }
  20 if { [regexp {FORWARD} ${whatis_result}] != 1 } {
  21   puts "Error: invalid result shape; FORWARD"
  22 }
  23 if { [regexp {Modified} ${whatis_result}] != 1 } {
  24   puts "Error: invalid result shape; Modified"
  25 }
  26 if { [regexp {Orientable} ${whatis_result}] != 1 } {
  27   puts "Error: invalid result shape; Orientable"
  28 }
  29 if { [regexp {Closed} ${whatis_result}] != 1 } {
  30   puts "Error: invalid result shape; Closed"
  31 }
  32
  33 set 2dviewer 1