1 puts "================"
3 puts "================"
6 ## [Regression to OCCT 7.0.0] Number of Intersections Is Wrong
9 restore [locate_data_file bug27565.brep] a
12 # Test number of solutions in a result.
13 set info [distmini d a_1 a_2 1.0]
14 if { [llength $info] != 9 } {
15 puts "Error : Extrema is wrong"
17 puts "OK: Extrema is valid"