0023375: (OCC 6.5.3 regression) BRepBuilderAPI_Sewing returns wrong result
[occt.git] / 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