61c421bf |
1 | puts "============" |
2 | puts "OCC2986" |
3 | puts "============" |
4 | puts "" |
5 | ###################################################### |
6 | # Cut&fuse oprs. for 2 toroidal faces, sharing the same domain give invalid result |
7 | ###################################################### |
8 | ## (new topology) |
9 | ## (bop) |
10 | ## (bopcut) |
11 | ## (bfuse) |
12 | ###################################################### |
13 | |
14 | ############# data ############# |
15 | ptorus p1 10 4 |
16 | explode p1 f |
17 | mksurface gs p1_1 |
18 | trim trgs gs 1 2 1 2 |
19 | mkface ff trgs |
20 | ############# testing faces are: p1_1 ff ############# |
21 | |
22 | bop p1_1 ff |
23 | bopcut rcut1 |
24 | checkshape rcut1 |
25 | |
26 | bfuse result rcut1 ff |
27 | |
28 | set square 1579.81 |
29 | set 3dviewer 1 |
30 | |