1
0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-04-03 17:56:21 +03:00
ski 5747059b21 0026833: Create command checkview containing all viewer types
Created command checkview for displaying shapes.
2016-02-05 11:14:37 +03:00

30 lines
497 B
Plaintext

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 s3 1
donly result
fit
checkprops result -s 5017.47