61c421bf |
1 | puts "=========" |
2 | puts " OCC1255 " |
3 | puts "=========" |
4 | puts "" |
5 | ############################################### |
6 | ## Exception in command 'section' |
7 | # (This script tests new topology) |
8 | ############################################### |
9 | |
10 | restore [locate_data_file OCC1255.brep] a |
11 | checkshape a |
12 | |
13 | plane p1 0 -36.8067 0 0 1 0 |
14 | mkface f1 p1 |
15 | |
16 | if { [catch {bop a f1 } ] } { |
17 | puts "Faulty OCC1255: BOP operation was made wrongly" |
18 | } else { |
19 | bopsection result |
20 | } |
21 | |
b4109929 |
22 | set length 5840.24 |
61c421bf |
23 | set 2dviewer 0 |
24 | |