[occt.git] / tests / bugs / moddata_2 / bug541

puts "========================"
puts " OCC541 "
puts "========================"
puts ""
############################################
## Extrema works wrong for line and circle laying on one plane.
############################################

restore [locate_data_file OCC541a.draw] c1x 
restore [locate_data_file OCC541b.draw] c2x 

set result [extrema c1x c2x]
set err [llength $result]
if { $err < 1} {
    puts "Faulty OCC541 (amount of solution): command extrema does NOT work properly"
} else {
    puts "OCC541 OK (amount of solution): : command extrema works properly"
}

checkview -display result -2d -path ${imagedir}/${test_image}.png
Commit	Line	Data
352ffd73	1	puts "========================"
	2	puts " OCC541 "
	3	puts "========================"
	4	puts ""
	5	############################################
	6	## Extrema works wrong for line and circle laying on one plane.
	7	############################################
	8
	9	restore [locate_data_file OCC541a.draw] c1x
	10	restore [locate_data_file OCC541b.draw] c2x
	11
	12	set result [extrema c1x c2x]
	13	set err [llength $result]
	14	if { $err < 1} {
	15	puts "Faulty OCC541 (amount of solution): command extrema does NOT work properly"
	16	} else {
	17	puts "OCC541 OK (amount of solution): : command extrema works properly"
	18	}
	19
5747059b	20	checkview -display result -2d -path ${imagedir}/${test_image}.png