puts "============" puts "OCC24086" puts "============" puts "" ######################################################################### # IsValid of result-Shape of BRepFeat_SplitShape returns False ######################################################################### pload QAcommands restore [locate_data_file bug24086_face.brep] face restore [locate_data_file bug24086_wire.brep] wire vinit set info [OCC24086 face wire] if { [regexp "INVALID" $info] == 1 } { puts "Error: result shape is invalid" } else { puts "OK: result shape is valid" } vfit vdisplay face vdisplay wire set only_screen 1