puts "================" puts "OCC28551" puts "================" puts "" ####################################################################### # Bad result of general fuse ####################################################################### restore [locate_data_file bug28551_ts_orig.brep] ts0 restore [locate_data_file bug28551_pc_orig.brep] pc DT_ShapeDivide ts ts0 bfuzzyvalue 1.0 bclearobjects bcleartools baddobjects ts baddtools pc bfillds bbuild result checkshape result checkview -display result -2d -path ${imagedir}/${test_image}.png