mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-10 18:51:21 +03:00
882e1d11aa
Treatment for single singular point is added. Test cases are updated to the new behavior. New test cases are added, Message of "bad" state is corrected.
27 lines
650 B
Plaintext
27 lines
650 B
Plaintext
puts "=========="
|
|
puts "OCC26938 "
|
|
puts "=========="
|
|
puts ""
|
|
#####################################################
|
|
# Boolean operations fail between two ellipsoids
|
|
#####################################################
|
|
|
|
restore [locate_data_file bug26938.brep] a
|
|
explode a
|
|
|
|
bcommon result a_1 a_2
|
|
|
|
# Check shape validity
|
|
checkshape result
|
|
|
|
# Check area
|
|
checkprops result -s 3.52497e+006
|
|
|
|
# Check self-intersection
|
|
set info [bopcheck result]
|
|
if { [regexp "This shape seems to be OK" ${info}] != 1 } {
|
|
puts "Error : The result of General Fuse operation is self-interfered shape"
|
|
}
|
|
|
|
checkview -display result -2d -path ${imagedir}/${test_image}.png
|