mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-09 18:50:54 +03:00
1a0339b464
1. The class Bnd_OBB has been created to describe the Oriented Bounding Box. 2. Several key methods have been implemented: Bnd_OBB::IsOut(...), Bnd_OBB::Add(...) and Bnd_OBB::Enlarge(...). 3. Interface of Bnd_Box class has changed. New methods have been created. See Bnd_Box.hxx for detailed information. 4. BRepBndLib and Draw_Box classes have been amended in order to provide correct work with Bnd_OBB class. 5. Interface of "bounding" DRAW-command has been changed. Please see help for detailed information. 6. New DRAW-command "isbbinterf" has been created. Please see help for detailed information. 7. "boundingstr" and "optbounding" DRAW-commands have been eliminated because their function can be made by "bounding" DRAW-command (e.g. see tests/bugs/vis/buc60857 or samples/tcl/snowflake.tcl test cases). 8. Documentation has been updated.
54 lines
1.2 KiB
Plaintext
Executable File
54 lines
1.2 KiB
Plaintext
Executable File
puts "============"
|
|
puts "OCC6334"
|
|
puts "============"
|
|
puts ""
|
|
#####################################################################
|
|
# Invalid result of MakeCylindricalHole when input solid is REVERSED
|
|
#####################################################################
|
|
|
|
set BugNumber OCC6334
|
|
|
|
# 1. Make box
|
|
box b 100 100 100
|
|
|
|
subshape b f 1
|
|
offsetshape t b 10 b_1
|
|
|
|
checkshape t
|
|
|
|
bounding -s t -save xt1 yy zz xt2 yy zz -dump
|
|
set ori [lindex [dtyp t] 2]
|
|
puts "Orientation of thick solid is $ori"
|
|
|
|
# 3. Make hole
|
|
hole h t 110 50 50 1 0 0 10
|
|
|
|
set che [checkshape h]
|
|
if { [regexp {Faulty} $che] } {
|
|
puts "Faulty ${BugNumber} : checkshape is wrong for h"
|
|
}
|
|
|
|
bounding -s h -save xh1 yy zz xh2 yy zz -dump
|
|
|
|
renamevar h result
|
|
|
|
checkprops result -s 117509
|
|
checkshape result
|
|
|
|
checknbshapes result -vertex 30 -edge 51 -wire 27 -face 24 -shell 1 -solid 1 -compsolid 0 -compound 1 -shape 135
|
|
|
|
# 4. Check thickness of box and hole
|
|
set dx_t [ dval xt2-xt1 ]
|
|
set dx_h [ dval xh2-xh1 ]
|
|
|
|
if { [expr abs($dx_h - $dx_t)] > 1e-5 } {
|
|
puts "Thickness of solid = $dx_t"
|
|
puts "Thickness of solid with hole = $dx_h"
|
|
puts "Invalid result of making a hole"
|
|
puts "Faulty ${BugNumber}"
|
|
} else {
|
|
puts "OK ${BugNumber}"
|
|
}
|
|
|
|
checkview -display result -2d -path ${imagedir}/${test_image}.png
|