3bea4c16 |
1 | puts "========================" |
2 | puts "OCC11081" |
3 | puts "========================" |
4 | puts "" |
5 | ####################################################################### |
6 | # BRepExtrema_DistShapeShape misses one of two solutions |
7 | ####################################################################### |
8 | |
9 | set BugNumber OCC11081 |
9e20ed57 |
10 | set RefResult "\"distmini\" command returns:\ndd_val dd dd2 \nOutput is complete." |
3bea4c16 |
11 | |
12 | # finite line is used |
13 | |
14 | line ll 6834.93 -4100 500 0 0 1 |
15 | trim trll ll -1000 -500 |
16 | mkedge tree trll |
17 | restore [locate_data_file OCC11081.brep] section4100 |
18 | set res_list [distmini dd tree section4100] |
3bea4c16 |
19 | |
20 | # Resume |
21 | puts "" |
9e20ed57 |
22 | if { [regexp $RefResult $res_list] != 1 } { |
3bea4c16 |
23 | puts "Faulty ${BugNumber}" |
24 | } else { |
25 | puts "OK ${BugNumber}" |
9e20ed57 |
26 | } |