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
|
puts "========"
puts "OCC26798"
puts "========"
puts ""
#######################################################################
# Boolean operations: keep desired cells and boundaries in the result
#######################################################################
smallview
box s1 10 10 10
psphere s2 12
pcylinder s3 10 20
pcone s4 10 0 30
bclearobjects
bcleartools
baddobjects s1 s2 s3 s4
bfillds
bcbuild r
bcremoveall
bcadd result s2 1 -m 1
bcremove result s1 0 s2 1 s3 0 s4 0
bcremoveint result
donly result
fit
checkprops result -s 1166.69
|