0029807: [Regression to 7.0.0] Impossible to cut cone from prism
[occt.git] / tests / bugs / modalg_6 / bug27981
1 puts "========"
2 puts "OCC27981"
3 puts "========"
4 puts ""
5 #################################################
6 # BRepExtrema_DistShapeShape returns not null distance on interfered shapes
7 #################################################
8
9 restore [locate_data_file bug27981_a.brep] a
10 restore [locate_data_file bug27981_b.brep] b
11
12 distmini dd a b
13 set dist [dval dd_val]
14 if {$dist > 1.e-7} {
15   puts "\nError: invalid distance.\n"
16 }
17