mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-07 18:30:55 +03:00
352ffd7358
Test case tests/bugs/modalg/dxf906 was renamed to bug889 Adding test cases to tests/bugs/moddata Modified expressions puts [checkshape result]. Added command vzfit in end file in folder bugs. Unlocked command coordload in QABugs_3.cxx Modified test case bugs vis buc60738 Added test cases to modalg and moddata Added test cases to caf and fclasses Added test cases to group heal
30 lines
795 B
Plaintext
Executable File
30 lines
795 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"
|
|
}
|
|
|
|
set 2dviewer 0
|
|
|