mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-04 18:06:22 +03:00
33 lines
979 B
Plaintext
Executable File
33 lines
979 B
Plaintext
Executable File
puts "TODO OCC12345 ALL: Error: Number of triangles"
|
|
puts "TODO OCC12345 ALL: Error: Number of nodes"
|
|
puts "TODO OCC12345 ALL: Error: Maximal deflection"
|
|
|
|
puts "============"
|
|
puts "OCC15519"
|
|
puts "============"
|
|
puts ""
|
|
#######################################################################
|
|
# Exception while meshing shape
|
|
#######################################################################
|
|
|
|
set BugNumber OCC15519
|
|
|
|
restore [locate_data_file OCC15519.brep] result
|
|
tclean result
|
|
|
|
set Deflection 1.
|
|
catch {incmesh result ${Deflection} }
|
|
|
|
if { [string compare $tcl_platform(platform) "windows"] == 0 } {
|
|
set good_tri 96265
|
|
set good_nod 71339
|
|
set good_defl 27.956052399907215
|
|
} else {
|
|
set good_tri 95582
|
|
set good_nod 70796
|
|
set good_defl 0.99827404224216676
|
|
}
|
|
|
|
checktrinfo result -tri ${good_tri} -nod ${good_nod} -defl ${good_defl} -tol_rel_defl 0.001 -tol_rel_tri 0.001 -tol_rel_nod 0.001
|
|
checkview -display result -2d -path ${imagedir}/${test_image}.png
|