[occt.git] / tests / bugs / moddata_3 / bug27804_2

puts "============"
puts "OCC27804"
puts "============"
puts ""
################################################################
## Two breps cause intersections to loop for too long/infinitely
################################################################

# The main idea of the test is performance meter. 


restore [locate_data_file bug27804_il1.brep] b1
restore [locate_data_file bug27804_il2.brep] b2

explode b2 e

#should create pcurve
bhaspc b2_1 b1 do

mk2dcurve c2d b2_1 b1

if { [regexp "2d curve" [whatis c2d]] != 1 } {
    puts "Faulty: No 2D curves detected"
}

v2d
donly c2d
2dfit

checkview -screenshot -2d -path ${imagedir}/${test_image}.png
Commit	Line	Data
3065019c	1	puts "============"
	2	puts "OCC27804"
	3	puts "============"
	4	puts ""
	5	################################################################
	6	## Two breps cause intersections to loop for too long/infinitely
	7	################################################################
	8
	9	# The main idea of the test is performance meter.
	10
	11
	12	restore [locate_data_file bug27804_il1.brep] b1
	13	restore [locate_data_file bug27804_il2.brep] b2
	14
	15	explode b2 e
	16
	17	#should create pcurve
	18	bhaspc b2_1 b1 do
	19
	20	mk2dcurve c2d b2_1 b1
	21
	22	if { [regexp "2d curve" [whatis c2d]] != 1 } {
	23	puts "Faulty: No 2D curves detected"
	24	}
	25
	26	v2d
	27	donly c2d
	28	2dfit
	29
	30	checkview -screenshot -2d -path ${imagedir}/${test_image}.png