[occt.git] / tests / bugs / modalg_6 / bug21624

puts "=========="
puts "OCC21624"
puts "=========="
puts ""
##############################################
# BRepFeat_SplitShape produce invalid shape
##############################################

restore [locate_data_file bug21624_splitBug.brep] cc
explode cc
splitshape result cc_1 cc_1 cc_2 cc_1 cc_3

set info [ checkshape result f ]

if { [regexp {The Shape result looks OK} $info] } {
  puts "OK: Splitshape produces valid shape"
} else {
  puts "Error: Splitshape produces invalid shape"
}

checkview -display result -2d -path ${imagedir}/${test_image}.png
Commit	Line	Data
b0deeecf	1	puts "=========="
	2	puts "OCC21624"
	3	puts "=========="
	4	puts ""
	5	##############################################
	6	# BRepFeat_SplitShape produce invalid shape
	7	##############################################
	8
	9	restore [locate_data_file bug21624_splitBug.brep] cc
	10	explode cc
	11	splitshape result cc_1 cc_1 cc_2 cc_1 cc_3
	12
	13	set info [ checkshape result f ]
	14
	15	if { [regexp {The Shape result looks OK} $info] } {
	16	puts "OK: Splitshape produces valid shape"
	17	} else {
	18	puts "Error: Splitshape produces invalid shape"
	19	}
	20
5747059b	21	checkview -display result -2d -path ${imagedir}/${test_image}.png