9aa684ed |
1 | if { [regexp {Debug mode} [dversion]] } { |
2 | puts "TODO OCC25917 ALL: TEST INCOMPLETE" |
3 | puts "TODO OCC25917 ALL: Tcl Exception" |
4 | } |
a87752f3 |
5 | |
6 | puts "========================" |
7 | puts " OCC472 " |
8 | puts "(case 3)" |
9 | puts "========================" |
10 | puts "" |
11 | ##################################################### |
12 | ## Bad result of Fuse Operation (Cut&Common - bad too). SAM1470 (#2634) |
13 | ##################################################### |
14 | |
15 | restore [locate_data_file OCC472a.brep] b1 |
352ffd73 |
16 | checkshape b1 |
a87752f3 |
17 | |
18 | restore [locate_data_file OCC472b.brep] b2 |
352ffd73 |
19 | checkshape b2 |
a87752f3 |
20 | |
21 | bfuse result b1 b2 |
22 | |
393598eb |
23 | set nb_v_good 66 |
24 | set nb_e_edge 107 |
25 | set square 31657.5 |
a87752f3 |
26 | set 2dviewer 0 |
27 | |