f1aa2b62 |
1 | |
2 | puts "========================" |
3 | puts "OCC620" |
4 | puts "========================" |
5 | puts "" |
6 | ############################ |
7 | ## No possibility to cut the shapes. |
8 | ############################ |
9 | |
10 | restore [locate_data_file OCC620a.brep] a |
352ffd73 |
11 | checkshape a |
f1aa2b62 |
12 | restore [locate_data_file OCC620b.brep] b |
352ffd73 |
13 | checkshape b |
f1aa2b62 |
14 | |
15 | bop a b |
16 | |
17 | if [catch { bopcut result } catch_result] { |
18 | puts "Faulty OCC620 : BOPCUT operation was made wrongly" |
19 | } else { |
20 | puts "OCC620 OK: BOPCUT operation works OK" |
21 | } |
22 | |
23 | set square 314742. |
24 | set 2dviewer 0 |