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