mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-05 18:16:23 +03:00
30 lines
846 B
Plaintext
Executable File
30 lines
846 B
Plaintext
Executable File
puts "=========="
|
|
puts "PRO19895"
|
|
puts "=========="
|
|
|
|
#############################################################################
|
|
## There is wrong tolerance after reading of the model in optimaze mode (C30). Retrive entity number 2139 from file
|
|
## "bm4_db_punch_a.stp" and will obtaine tolerance. It is very big and isolains extend from entity.
|
|
#############################################################################
|
|
|
|
stepread [locate_data_file bm4_db_punch_a.stp] a *
|
|
|
|
tpcompound b
|
|
isos b 0
|
|
isos b 3
|
|
tpcompound result
|
|
|
|
tpdraw 2139
|
|
|
|
checkshape tp_2139
|
|
checkshape tp_2139 r
|
|
|
|
set MaxTolerance [ lindex [ split [ lindex [tolerance tp_2139] 1 ] = ] 1 ]
|
|
puts "MaxTolerance = $MaxTolerance"
|
|
if { $MaxTolerance > 1 } {
|
|
puts "Error : Tolerance of shape is more then 1.0"
|
|
}
|
|
|
|
checkview -display result -2d -path ${imagedir}/${test_image}.png
|
|
|