3b337f77 |
1 | puts "========" |
2 | puts "OCC23378" |
3 | puts "========" |
4 | puts "" |
5 | ######################################## |
6 | # BRepAlgoAPI_Cut returns wrong result |
7 | ######################################## |
8 | |
9 | # Restore the initial shape |
10 | restore [locate_data_file bug23378_blower1.brep] b |
11 | |
12 | # Test case body |
13 | explode b |
14 | bop b_1 b_2 |
15 | bopcut r |
16 | |
17 | # Result of operation should be two shapes (checking) |
18 | set oper_result [explode r] |
19 | if {[llength $oper_result] != 2} { |
20 | puts "ERRROR: Result of BrepAlgoAPI_Cut is unexpected" |
21 | } |
22 | |
23 | # Algorithmic check of r_2 shape |
24 | renamevar r_2 result |
25 | checkshape result |
26 | checkprops result -s 2.77917 |
27 | |
28 | # Visualization check of r_2 shape |
29 | vinit |
30 | vsetdispmode 1 |
31 | vdisplay result |
32 | vfit |
33 | checkview -screenshot -3d -path ${imagedir}/${test_image}.png |