[occt.git] / tests / bugs / moddata / bug703

puts "=========="
puts "OCC703    "
puts "=========="
puts ""
##################################################
## Wrong result of extrema
## Draw command extrema c1 ce gives no solutions, but must be 2 solutions
##################################################

restore [locate_data_file OCC703_1.draw] c1 
restore [locate_data_file OCC703_2.draw] ce 

set result [extrema c1 ce]
set err [llength $result]
if { $err != 2} {
    puts "Faulty OCC703 (amount of solution): command extrema does NOT work properly"
} else {
    puts "OCC703 OK (amount of solution): command extrema works properly"
}

set 2dviewer 0
Commit	Line	Data
352ffd73	1	puts "=========="
	2	puts "OCC703 "
	3	puts "=========="
	4	puts ""
	5	##################################################
	6	## Wrong result of extrema
	7	## Draw command extrema c1 ce gives no solutions, but must be 2 solutions
	8	##################################################
	9
	10	restore [locate_data_file OCC703_1.draw] c1
	11	restore [locate_data_file OCC703_2.draw] ce
	12
	13	set result [extrema c1 ce]
	14	set err [llength $result]
	15	if { $err != 2} {
	16	puts "Faulty OCC703 (amount of solution): command extrema does NOT work properly"
	17	} else {
	18	puts "OCC703 OK (amount of solution): command extrema works properly"
	19	}
	20
	21	set 2dviewer 0
	22