mirror of
https://github.com/Open-Cascade-SAS/OCCT.git
synced 2026-05-10 17:40:24 +08:00
c04f5e0b4c
- Fix negative modulo in torus bounding box computation - Fix hyperbola extrema loop early break condition - Fix OpenMin/OpenMax direction sign for infinite bounds - Remove dead code in cone bounding computation - Replace sqrt/log with more efficient computations in hyperbola bounds - General code cleanup and modernization
58 lines
1.2 KiB
Plaintext
58 lines
1.2 KiB
Plaintext
puts "===================================="
|
|
puts "0032239: Data Exchange, STEP import - bounding box is too large"
|
|
puts "===================================="
|
|
puts ""
|
|
|
|
pload ALL
|
|
|
|
# Read file
|
|
|
|
stepread [locate_data_file bug32239.STEP] b *
|
|
|
|
# Check that shape is valid
|
|
|
|
checkshape b_1
|
|
|
|
# Check bounding box
|
|
|
|
set xmin0 -62.992562093513783
|
|
set ymin0 -51.45371311501097
|
|
set zmin0 -33.223762093513777
|
|
set xmax0 43.257600511674156
|
|
set ymax0 33.211062093513789
|
|
set zmax0 37.744962093513792
|
|
set bb [bounding b_1]
|
|
set xmin [lindex $bb 0]
|
|
set ymin [lindex $bb 1]
|
|
set zmin [lindex $bb 2]
|
|
set xmax [lindex $bb 3]
|
|
set ymax [lindex $bb 4]
|
|
set zmax [lindex $bb 5]
|
|
|
|
if { [expr abs($xmin - $xmin0)] > 1.0e-5 } {
|
|
set bb_changed 1
|
|
}
|
|
if { [expr abs($xmax - $xmax0)] > 1.0e-5 } {
|
|
set bb_changed 1
|
|
}
|
|
if { [expr abs($ymin - $ymin0)] > 1.0e-5 } {
|
|
set bb_changed 1
|
|
}
|
|
if { [expr abs($ymax - $ymax0)] > 1.0e-5 } {
|
|
set bb_changed 1
|
|
}
|
|
if { [expr abs($zmin - $zmin0)] > 1.0e-5 } {
|
|
set bb_changed 1
|
|
}
|
|
if { [expr abs($zmax - $zmax0)] > 1.0e-5 } {
|
|
set bb_changed 1
|
|
}
|
|
|
|
if { [info exists bb_changed] } {
|
|
puts "Error: not expected bounding box"
|
|
}
|
|
|
|
renamevar b_1 result
|
|
checkview -display result -3d -path ${imagedir}/${test_image}.png
|
|
|