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