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
31
32
|
puts "========"
puts "OCC26798"
puts "========"
puts ""
#######################################################################
# Boolean operations: keep desired cells and boundaries in the result
#######################################################################
smallview
psphere s1 15
psphere s2 15
psphere s3 15
ttranslate s1 0 0 10
ttranslate s2 20 0 10
ttranslate s3 10 0 0
bclearobjects
bcleartools
baddobjects s1 s2 s3
bfillds
bcbuild r
bcaddall result
bcremove result s1 1 s2 1 s3 1
bcremove result s2 0 s3 1
donly result
fit
checkprops result -s 7172.78
|
