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