0e94a94e |
1 | puts "TODO OCC12345 ALL: Error : the resulting shape is unclosed!!!" |
2 | |
3 | puts "========================" |
4 | puts "BUC60775" |
5 | puts "OCC160" |
6 | puts "(CUT: B and A)" |
7 | puts "========================" |
8 | |
9 | restore [locate_data_file buc60775a.brep] a |
352ffd73 |
10 | checkshape a |
0e94a94e |
11 | restore [locate_data_file buc60775b.brep] b |
352ffd73 |
12 | checkshape b |
0e94a94e |
13 | |
14 | bcut result b a |
352ffd73 |
15 | checkshape result |
0e94a94e |
16 | |
17 | set nf [llength [explode result f]] |
18 | if {$nf < 6} { |
19 | puts "Error : the resulting shape is unclosed!!!" |
20 | } |
21 | |
58cf74e0 |
22 | checkprops result -s 247636 |
5747059b |
23 | checkview -display result -2d -path ${imagedir}/${test_image}.png |
0e94a94e |
24 | |
25 | |