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

pload QAcommands

puts "========="
puts " OCC814 "
puts "========="
puts ""
####################################
## Geom2dGcc_Lin2d2Tan fails on circle and ellipse
####################################

set result [OCC814]

set nb_sol 0

regexp {nb of solutions = ([-0-9.+eE]+)} $result full nb_sol

if {$nb_sol > 0} {
    puts "OCC814 OK"
} else {
    puts "Faulty OCC814"
}
Commit	Line	Data
352ffd73	1	pload QAcommands
	2
	3	puts "========="
	4	puts " OCC814 "
	5	puts "========="
	6	puts ""
	7	####################################
	8	## Geom2dGcc_Lin2d2Tan fails on circle and ellipse
	9	####################################
	10
	11	set result [OCC814]
	12
	13	set nb_sol 0
	14
	15	regexp {nb of solutions = ([-0-9.+eE]+)} $result full nb_sol
	16
	17	if {$nb_sol > 0} {
	18	puts "OCC814 OK"
	19	} else {
	20	puts "Faulty OCC814"
	21	}
	22
	23