f1aa2b62 |
1 | puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_" |
2 | puts "TODO OCC12345 ALL: Error : The square of result shape is" |
3 | |
4 | puts "========" |
5 | puts "OCC774" |
6 | puts "SAM1647" |
7 | puts "(case 2)" |
8 | puts "========" |
9 | puts "" |
10 | ################################# |
11 | ## |
12 | restore [locate_data_file OCC774.brep] a |
13 | explode a |
352ffd73 |
14 | checkshape a_1 |
15 | checkshape a_2 |
f1aa2b62 |
16 | |
17 | if { [catch { bcut result a_2 a_1 } status] } { |
18 | puts "Faulty OCC774 (case 2)" |
19 | } |
20 | |
21 | set square 0 |
22 | set 2dviewer 0 |