1
0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-04-10 18:51:21 +03:00
occt/tests/bugs/moddata_3/bug25737_1
ski 5747059b21 0026833: Create command checkview containing all viewer types
Created command checkview for displaying shapes.
2016-02-05 11:14:37 +03:00

33 lines
748 B
Plaintext
Executable File

puts "============"
puts "CR25737"
puts "============"
puts ""
###################################################################################
# GCPnts_TangentialDeflection does not produce points to approximate a knee
###################################################################################
restore [locate_data_file bug25737_face3535.brep] result
tclean result
incmesh result 1 -a 20
isos result 0
triangles result
set report [tricheck result]
if {$report != ""} {
puts "Error : Problem of build a mesh"
} else {
puts "OK : Building a mesh is good"
}
# Checking triangulation area (triarea command)...
set rel_tol 1
set area_eps 0
smallview
donly result
fit
checkview -screenshot -2d -path ${imagedir}/${test_image}.png