mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-08-09 13:22:24 +03:00
25 lines
571 B
Plaintext
25 lines
571 B
Plaintext
puts "============"
|
|
puts "OCC5157"
|
|
puts "============"
|
|
puts ""
|
|
######################################################
|
|
# DRAW commands vprops and sprops with tolerance 1.e-6 hange on attached shape.
|
|
######################################################
|
|
|
|
cpulimit 3500
|
|
#dchrono h reset; dchrono h start
|
|
|
|
catch { pload XDE }
|
|
|
|
set BugNumber OCC5157
|
|
|
|
if { [catch { stepread [locate_data_file OCC5157.stp] a * } catch_result] } {
|
|
puts "Faulty ${BugNumber} : here is reading problem"
|
|
} else {
|
|
tpcompound result
|
|
}
|
|
set tol_square 1.e-6
|
|
set square 35362.3
|
|
set 2dviewer 0
|
|
|