[occt.git] / tests / bugs / modalg_5 / bug25887

puts "========"
puts "OCC25887"
puts "========"
puts ""
#############################
# Invalid pipe construction
#############################

restore [locate_data_file OCC25887_shape.brep] a

smallview

explode a

pipe res a_1 a_2 1

donly res
fit

set bug_info [checkshape res]
if {[string compare $bug_info "This shape seems to be valid"] != 0} {
  puts "ERROR: OCC25887 is reproduced."
}

checkview -screenshot -2d -path ${imagedir}/${test_image}.png
Commit	Line	Data
0f9f1f4e	1	puts "========"
	2	puts "OCC25887"
	3	puts "========"
	4	puts ""
	5	#############################
	6	# Invalid pipe construction
	7	#############################
	8
	9	restore [locate_data_file OCC25887_shape.brep] a
	10
	11	smallview
	12
	13	explode a
	14
	15	pipe res a_1 a_2 1
	16
	17	donly res
	18	fit
	19
	20	set bug_info [checkshape res]
	21	if {[string compare $bug_info "This shape seems to be valid"] != 0} {
	22	puts "ERROR: OCC25887 is reproduced."
	23	}
	24
5747059b	25	checkview -screenshot -2d -path ${imagedir}/${test_image}.png