mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-03 17:56:21 +03:00
25 lines
572 B
Plaintext
Executable File
25 lines
572 B
Plaintext
Executable File
puts "============"
|
|
puts "OCC23933"
|
|
puts "============"
|
|
puts ""
|
|
######################################################
|
|
# Self intersection reported after Fuse operation
|
|
######################################################
|
|
|
|
restore [locate_data_file bug23933_a.brep] a
|
|
restore [locate_data_file bug23933_b.brep] b
|
|
|
|
checkshape a
|
|
checkshape b
|
|
bopargcheck a b -F
|
|
|
|
if { [catch {bfuse result a b} catch_result] } {
|
|
puts "Faulty OCC697"
|
|
}
|
|
|
|
checkshape result
|
|
bopargcheck result
|
|
|
|
checkprops result -s 246487
|
|
checkview -display result -3d -path ${imagedir}/${test_image}.png
|