Adding test cases from chl grid
[occt.git] / tests / bugs / moddata / bug11081_1
1 puts "========================"
2 puts "OCC11081"
3 puts "========================"
4 puts ""
5 #######################################################################
6 # BRepExtrema_DistShapeShape misses one of two solutions
7 #######################################################################
8
9 set BugNumber OCC11081
10
11 # infinite line is used
12
13 line ll 6834.93 -4100 500 0 0 1
14 mkedge ee ll
15 restore [locate_data_file OCC11081.brep] section4100
16 distmini dd ee section4100
17 set res_list [distmini dd ee section4100]
18 set res_length [llength ${res_list}]
19 puts "res_length = ${res_length}"
20
21 # Resume
22 puts ""
23 if { ${res_length} != 3 } {
24    puts "Faulty ${BugNumber}"
25 } else {
26    puts "OK ${BugNumber}"
27 }
28