mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-03 17:56:21 +03:00
32 lines
544 B
Plaintext
32 lines
544 B
Plaintext
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
|
|
|
|
bcremoveall
|
|
bcadd result s1 0 s2 1 s3 1
|
|
|
|
donly result
|
|
fit
|
|
|
|
checkprops result -s 1345.27
|
|
|