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

32 lines
551 B
Plaintext

puts "========"
puts "OCC26798"
puts "========"
puts ""
#######################################################################
# Boolean operations: keep desired cells and boundaries in the result
#######################################################################
smallview
box b1 10 10 10
box b2 0 30 0 10 10 10
compound b1 b2 b1
box b3 5 5 5 10 10 10
box b4 30 5 5 10 10 10
compound b3 b4 b2
don b1 b2
bclearobjects
bcleartools
baddobjects b1 b2
bfillds
bcbuild r
bcremoveall
bcadd result b2 1
donly result
fit
checkprops result -s 1350