0031587: Modeling Data - add BRepTools::RemoveInternals() removing internal sub-shape...
[occt.git] / tests / bugs / moddata_3 / bug27565
1 puts "================"
2 puts "OCC27565: "
3 puts "================"
4 puts ""
5 ####################
6 ## [Regression to OCCT 7.0.0] Number of Intersections Is Wrong
7 ####################
8
9 restore [locate_data_file bug27565.brep] a
10 explode a
11
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"
16 } else {
17     puts "OK: Extrema is valid"
18 }