mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-03 17:56:21 +03:00
948fe6ca88
Implementation of the method for simplification of the result of Boolean Operation on the API level. The method BRepAlgoAPI_BuilderAlgo::SimplifyResult has been added, so the derived classes such as BooleanOpeation and Splitter can also use this method. The result shape simplification should be called after the operation is done. The simplification is performed by the means of ShapeUpgrade_UnifySameDomain algorithm. Draw command "bsimplify" has been added to control the simplification options. Documentation for new functionality and draw commands controlling the options of Boolean operations. Test cases for the new functionality. Side-effect change: The algorithms in Boolean component have been changed to use the BRepTools_History as a History tool. Now it became possible to disable the collection of shapes modifications during Boolean Operations, which may be useful for performance sake (in draw the option is controlled by *setfillhistory* command). Draw command "unifysamedom" has been changed to accept the angular tolerance in degrees instead of radians.
42 lines
952 B
Plaintext
42 lines
952 B
Plaintext
# History of section operation
|
|
|
|
# extract faces of the box, enlarge them and intersect
|
|
box b 10 10 10
|
|
|
|
compound faces
|
|
|
|
foreach f [explode b f] {
|
|
mksurface s $f
|
|
mkface fn s -100 100 -100 100
|
|
add fn faces
|
|
}
|
|
|
|
# perform intersection
|
|
bclearobjects
|
|
bcleartools
|
|
baddcompound faces
|
|
bfillds
|
|
# enable history collection
|
|
setfillhistory 1
|
|
bbop result 4
|
|
|
|
savehistory history
|
|
|
|
# check that all faces have been deleted, have not been modified
|
|
# and each face has generated edges
|
|
|
|
foreach f [explode faces] {
|
|
if {![regexp "Deleted" [isdeleted history $f]]} {
|
|
puts "Error: Incorrect information about deleted shapes"
|
|
}
|
|
|
|
if {![regexp "The shape has not been modified" [modified modif history $f]]} {
|
|
puts "Error: Incorrect information about modified shapes"
|
|
}
|
|
|
|
if {[regexp "No shapes were generated from the shape" [generated gen history $f]]} {
|
|
puts "Error: Incorrect information about generated shapes"
|
|
}
|
|
checknbshapes gen -edge 12
|
|
}
|