mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-03 17:56:21 +03:00
34 lines
724 B
Plaintext
34 lines
724 B
Plaintext
puts "========"
|
|
puts "OCC23378"
|
|
puts "========"
|
|
puts ""
|
|
########################################
|
|
# BRepAlgoAPI_Cut returns wrong result
|
|
########################################
|
|
|
|
# Restore the initial shape
|
|
restore [locate_data_file bug23378_blower1.brep] b
|
|
|
|
# Test case body
|
|
explode b
|
|
bop b_1 b_2
|
|
bopcut r
|
|
|
|
# Result of operation should be two shapes (checking)
|
|
set oper_result [explode r]
|
|
if {[llength $oper_result] != 2} {
|
|
puts "ERROR: Result of BrepAlgoAPI_Cut is unexpected"
|
|
}
|
|
|
|
# Algorithmic check of r_2 shape
|
|
renamevar r_2 result
|
|
checkshape result
|
|
checkprops result -s 2.77917
|
|
|
|
# Visualization check of r_2 shape
|
|
vinit
|
|
vsetdispmode 1
|
|
vdisplay result
|
|
vfit
|
|
checkview -screenshot -3d -path ${imagedir}/${test_image}.png
|